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(PAGE 1) 
i. ABSTRACT 


TES SEP PLOTS WEE PoE EP RDN 


S CAPABLE ISING ANY T DRIVE THA 
fel gPERATED ia A UNI BUS si i SYSTEM THROUGH THE TM,A,B ff Tec 
NTROLLER. ANY TYPE OF TAPE DRIVE: 7 OR 9 TRAC ho USED 
NY NUMBER OF DRIV VES SINGLE OR MULTIDRIVE SYSTEMS Eiout 
rey MAY BE TESTED BY A SINGLE EXECUTION OF THE PROGRAM.” 
FLEXIBILITY IS POSSIBLE BECAUSE THE PROGRAM HAS NO FIXED PARARE TERS 
OR TESTING SE THE ENTIRE TEST PLAN, INCLUDING PARAIE TERS 
AND OPERATING SEQUENCE, IS DETERMINED BY THE OPERATOR T 
RESPONSES TO TELETYPE REQUESTS AND SETTING OF CONSOLE SUI TCHES. 
THE PROGRAM PROVIDES FOR eesti ING NG_OF ALL TAPE DRIVE FUNCTIONS 


SUCH AS WRITING, READING, REWINDING, TAPE POSITIONING,EOT - BOT 
SENSING AND ASSUMES A Gb0B LORTRSCLER. 


HOWEVER; THE CONTROLLER IS TESTED SOMEWHAT INTRINSICALLY 
DURING THE TEST CYCLE IN ORDER TO PROVIDE FULL INFORMATION 
ABOUT ANY ERROR CONDITIONS DETECTED. 


DURING A TEST CYCLE, CHECKS ARE MADE FOR STATUS ERRORS, DATA ERRORS, 
POSITION ERRORS. WORD COUNT AND CURRENT MEMORY ADDRESS ERRORS 
WHEREVER APPLICABLE. 


é. REQUIREMENTS (HARDWARE ) 


A. ANY POP-11 PROCESSER 
B. 8K OF CORE 

6° ars 
E 


a 
; ™M,A,B-11 TAPE CONTROL UNIT 
; 1-to’8 TS03 OR TUIO,N,W MAG TAPE DRIVES 


USE STANDARD PROCEDURE FOR LOADING BINARY TAPES 
8: PROGRAM IS LOADABLE AND CHAINABLE IN 8K OF MEMORY 


DRIVE 9 
AT STRK,800 BPI,109 RECORDS OF 200 CHARACTES EACH, 
WITH PATTERN ONE AND ALL SWITCHES 0. 


ne ne ee ee me ee ae eee 
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110 
id (PASE 2) 
113 4, STARTING PROCEDURE 
1 
1” a6 THERE ARE FOUR (4) STARTING ADDRESSES THAT MAY BE USED; 
112 20018), 204(8), 21018), AND 240(8): 
46 
718 A. 200(8): THIS ADDRESS MUST BE USED ON INITIAL START FROM 
180 LOAD AS ALL PORAME TERS, ARE ENTERED FROM HERE. 
tel REQUESTS ARE PRINTED ON THE TELETYPE FOR ENTRY OF 
ioe CONTROLL R REGIST R SPaRT NG ADDRESS, VECTOR ADDRESS, 
ie3 UNIT DENSITY, PARITY, RECORD 
et COUNT BATTERN NUR NUMBER, TAPE MARK (EOF) OPTION. AND STALL 
| is FOR READ, WRITE, AND TURNAROUND. ALL REPONSES SHOULD 
| 16 BE MADE {N OCTAL AND WITHIN THE LIMITS OF THE PARAMETER 
re Te A QUESTION MARK (7) WILL BE TYPED IF ANY 
| 188 CHARACTER ENTERED IS NOT BETWEEN O THRU 7 (OCTAL). 
| 123 THE CHARACTEFAMAY BE RETYPED FOLLOWING THE QUESTION 
| 130 MARK. IF THE@2ESPONSE IS NOT WITHIN ITS LIMITS. A 
et STION MARK (©) IS TYPED AND THE ENTIRE RESPONSE 
. i MAY BE RENTERED. SOME RESPONSES REQUIRE MORE THAN ONE 
i i (1) CHARACTER, BUT NONE REQUIRES MORE THAN SIX (6).- 
| $s PESD Ne’? NEED NOT HAVE, BE TERMINATED BY A CARRIAGE 
| 36 RETURN iF te Pes THAN THE MAXIMUM NUMBER OF CHARACTERS 
13 IS INPUT. 
339 B. 2048): THIS ADDRE D BE USED ANYTIME A RESTART 
i490 OF NECESSARY AND THE PARAMETERS 
141 ENTERED AT THE INITIAL START OF 200(8) NEED 
142 BE C : NOTE THAT ANY DATA PATTERN WHICH 
143 ED BY SETTING THE RANDOM DATA 
144 SWITCH (CONSOLE SWITCH EIGHT) WILL NOT BE OVERWRITTEN 
145 AND THERFORE IS HELD IN CORE FOR USE UNTIL 
16 CONSOLE SWITCH EIGHT(8) IS AGAIN SET. 
148 C. 210(8): THIS RODRESS 1s THE SAME AS USING 204(8) IN THAT THE 
149 PREVIOUSLY SET PARAMETERS ARE USED: HOWEVER, THE DATA 
150 PATTERN IS RETURNED TO THE FIXED PATTERN CRIGINALLY 
151 CALLED FOR AT THE 200(8) START. ALSO ALL STATISTICS 
ibe PREVIOUSLY GATHERED WILL BE CLEARED. 
154 
155 D. 240(8): THIS IS A SPECIAL ADDRESS WHICH WILL CAUSE SE THE 
166 PROGRAM TO EXECUTE A PREDETERMINED TE’ 
ta BY’ THE OBEERTOR Ts°A RECBONE rihel Beaute FD THE 
159 CONTROLLER ADDRESS REEF oR ADDRESS, AND CONTINUOUS 
169 OPERATION OF THE SEGUENCE. 
ig2 SEE ITEM 11, (PAGE 22) FOR FULL DETAILS. 
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Be ABCA MRL EEL 


REGISTER START: i R QUIRED FOR THIS REQUEST IS T 
wecioren F FER THE ADDRES fe oF THE FIRST CONTROLLER PEGISTER 
NTS) AS A SIX DIGIT UNIBUS ADDRESS. 


VECTOR ADDRESS: THE RESPONSE FOR THIS REQUEST IS TO ENTER THE 
INTERRUPT VECTOR BORE yee0 BY THE CONTROLLER 
AS A THREE (3) DIG 


UNIT NUMBER: MM IS ENTERED AS ONE (1) OCTAL 
CHARACTER AND ast BE of Ba THE LIMITS OF 0 
ROUGH 7. WHEN T T NUMBER HAS BEEN EN 


TERUINATE THE UNIT ENTRIE 
TO THE NEXT PARAMETER. I 
THAT AT LEAST ONE 


UNIT NUMBER 
ENTERED. IF THE FIRST REQUEST IS 
TO BY A CARRIAGE RETURN, T 
WILL BE REPEATED. 


i 
i 
aa 
R 


DENSITY: THE DENSITY REQUEST IS RESPONDED TO BY ONE (1) OCTAL 
HARACTER AND MUST BE WITHIN THE LIMITS OF O THRU 3. 
Ke EACH UNIT NUMBER IS A REQUEST FOR THE 
OPERATING DENSITY FOR THAT UNIT IS TYPED. 
RESPONSE MEANINGS ARE AS FOLLOW the: 


B. 1 = SS6BPI, 7 CHANNEL NRZI 
C. 2 = 800BPI,.7 CHANNEL NRZI 
D. 3 = SO0BPI, 9 CHANNEL NRZI 


oe eee 1 + ee 











[pee 
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17 
| E18 (PAGE 4) 
| B29 PARITY: THE PARITY REQUEST IS R SPONDED TO BY ONE (1) 
2] OCTAL CHARACTER AND MUST BE EITHER O OR 1. 
<4 
223 A. 1 = EVEN PARITY 
| ges B. 0 = ODD PARITY 
ese RECORD COUNT: THIS REQUEST IS RESPONDED TO BY A SIX (6) CHARACTER 
| eer OCTAL NUMBER FROM 1 TO 177777. REMEMBER LEADING 
229 ARE NOT REQUIRED AND IF LESS THAN SIX 
| 588 CHARACTERS ARE ENTERED, A CARRIAGE RETURN 
| 230 WILL TERMINATE THe RESPONSE. THE RECORD COUNT 
| gl IS USED IN CONJUCTION WITH THE CHARACTER COUNT 
232 TO ESTABLISH A BLOCKING FACTOR FOR USE IN READ OR 
#33 WRITE CYCLES. 
| Bas CHARACTER COUNT: THIS RESPONSE IS ENTERED AS FOUR (4) OCTAL 
| 63% CHARACTERS WITHIN THE LIMITS OF 4 THRU 4000. AGAIN 
| 37 LEADING ZEROS ARE NOT REQUIRED AND A CARRIAGE 
| 638 RETURN TERMINATES A LESS THAN FOUR (4) CHARACTER 
ps RESPONSE. THE CHARACTER COUNT IN CONJUNCTION 
249 THE RECORD COUNT IS USED TO ESTABLISH 
24} THE BLOCK SIZE (CHARACTERS PER RECORD, AND 
242 CORDS PER BLOCK) USED IN READ AND WRITE CYCLES 
243 HE SAME BLOCKING IS USED ON ALL AVAILABLE UNITS. 
PATTERN NUMBER: THIS RESPONSE IS A TWO (2) CHARACTER 
NUMBER WITHIN THE LIMITS THRU 20(8). 
24 WILL A SPECIFIC DATA 
248 PATTERN TO BE USED FOR ALL READING AND WRITING. THIS 
249 DATA PATTERN IS NOT SS RANDOM DAT 
IS REQUESTED BY SETTING C SWITCH EIGHT (8) 
251 A ONE. RESETTING OF THE RANDOM DATA SWITC 
DOES NOT CAUSE REVERSION TO THE FIXED PATTERN 
WILL THE LAST GENERATED PATTERN UNTIL 
254 A RESTART IS DONE FROM LOCATION 210(8) OR 200(8) 
HE SELECTION OF DATA PATTERN ZERO (0) HAS A 
Fit4 CIAL USE. PAT ZERO (0) WILL 
27 CAUSE TO BE READ IN AT THE HIGH PAPER 
TAPE RE ANY DATA PATTERN DES 
259 HE EXTERNAL INPUT DATA T THE READER 
eee 15 DONE Y PREPARING A TAPE WITH A PROGRAM 
1 ALLED DTC. (MAINDEC-11-D2TUF) CONFIGURATION 
2E2 OF BIT CHARAC MAY BE USED AND A LIMIT 
263 OF 377(8) CHARATERS IS IMPOSED. WHEN EXTERNAL 
264 DATA IS INPUT, THE ENTIRE WRITE BUFFER IN 
2E5 CORE IS FILLED WITH PATTERN SO THAT ANY 
266 SIZE RECORD MAY BE USED. DATA PATTERN 
267 ZERO (0) EXTERNAL PAPER TAPE NEED ONLY 
2e8 BE READ ONCE AT INITIAL START OF 200(8), AND 
269 NEED NOT BE READ AGAIN UNLESS OVERWRITTEN BY 
270 BE SURE TO LOAD THE READER 


RANDOM DATA. 
271 BEFORE PRESSING START. 


ee - SL OE A ET TT 
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27 SEE ITEMS, (PAGE 7) FOR @ DESCRIPTION OF THE 
274 DATA PATTERNS. 
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TAPE MARK: 


SINGLE PASS: 


STALLS: 


(PAGE S) 
Te TAPE MARK REQUEST IS ae a TO (Ally. ad 


THE OPERATOR WISHES TO HA 
EPARATED By A TAPE MA 


INCR' He HE BLOCK K SIZE ( CORD; 
IN OTHER WORDS, A BLOCK OF 100 RECORDS WILL 
HAVE THE TAPE 


IF RESPONDED TO WITH A ONE 
T AN END OF PAS 


MARK AS RECORD 101. 


THE PROGRAM WILL HALT 
S MESSAGE WHEN THE LAST 


AND PRINT AN 
AVAILABLE UNIT REACHES END OF TAPE AND IS REWOUND. 


THE STALL REQUESTS ARE RESPONDED TO ae a Bix (6) 
Tee 177772. NUMBER WITHIN THE LIMITS OF 1 


E oe NG ZEROS ARE NOT REQUIRED AND 
AN ENTRY OF LESS THAN SIX (6) tpl SHOULD 


BE TERMINATED BY A CARRIAGE RETURN. EACH INCREMENT: 
OF THE VALUE ADDS ABOUT 2.6 MICSEC TO THE DELAY. 


READ: THE TIME DELAY BETWEEN EACH RECORD READ 
WRITE: THE ue DELAY BETWEEN a RECORD WRITTEN 
TURN AROUND: TI 


ME DELAY aM TWEEN C 
DIRECTION (FORWARD, TO REVERSE,ETC.) 
AND BETWEEN BLOCKS. 


FIXED PARAMETERS: IT SHOULD BE NOTED THAT ALL PARAMETERS EXCEPT 
FOR THE UNIT DESCRIPTION VALUES (UNIT 
NUMBER, DENSITY, AND PARITY) HAVE NOMINAL 
ALREADY STORED IN Th 


. EACH PARAMETER REQUEST (PAT ings NUMBER, RECORD 


a me re ee ee oe. 


CHAN 
AT 


CHARACTER COUNT STALLS Is TYPED. 
oe te ALSO LBATAT 


SPONSE NO 
GE WILL BE MADE. EACH START OF THE PROGRAM 
200(8) WILL SHOW THE CURRENT ae OF THESE 


PARAMETERS AS PER THE LAST ENTRY 
RESH LOAD OF THE PAPER TAPE IS DONE. 


IN 


MMOOWD 


F THE 
PARAMETERS WILL REFLECT THE FIXED VALUES STORED 
ROGRAM. 


THE P 


- RECORD COUNT = 100 

. CHARACTER COUNT. = Foes 

. PATTERN NUMBER 
READ STALL = 1 


. WRITE = 1 
: TURN AROUND = 1 
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331 
$32 (PAGE 4) 
$34 SAMPLE START AT 200(8): 
| 338 THE FOLLOWING IS A SAMPLE OF THE 
$3, PRINTED REQUESTS AND THEIR RESPONSES. 
RESPONSES ARE ENCLOSED IN PARENS FOR 
$33 CLARITY ONLY AND (CR) MEANS CARRIAGE RETURN 
EA LOAD ADDRESS 200(8), SET CONSOLE SWITCHES, PRESS START SWITCH: 
343 ™M,A,B-11:TSO3 OR TU1O,N,W MULTIDRIVE DATA RELIABILTY EXERCISER 
344 ENTER CONDITIONS IN OCtAL 
345 REGISTER START = 17e520_ (CR) 
345 VECTOR ADDRESS = 224 (CR) 
347 UNIT NUMBER= 
| B48 DENSITY= 
; 3 FARITY=(Q) 
| 380 UNIT NUMBER=(2) 7 TRK 
> DENSI TY=(e) 
| 32 PARITY=(1) 
| 33 UNIT NUMBER=(CR) 
| 354 RECORD COUNT=100 (500)(CR) 
355 CHARACTER COUNT=201_(38)7(7) (CR) 
| 356 PATTERN NUMBER=1 (22) 
i . 
258 (6) {CR} 
353 ; TAPE MARK = 0 (1)(CR) 
360 SINGLE PASS = O(CR) 
352 ENTER STALLS 
263 READ=1 (CR) 
364 WRITE=1 (CR) 
365 : TURN AROUND=1 (3000)(CR) 
367 THE PROGRAM WILL NOW PERFORM THE TEST CYCLE SET IN 
368 THE CONSOLE SWITCHES ON UNIT FIVE (5) THEN TWO 
369 UNIT LE, USING DATA PATTE 
370 NUMBER SIX (6) WITH A BLOCKING FACTOR OF 37 CHARACTERS 
371 PER RECORD AND SOO RECORDS PER BLOCK. THE DELAYS ARE SET 
372 FOR MINIMUM ON READ AND WRITE, AND APPROXIMATELY .75 
273 SECONDS ON TURN AROUND. 


+ 
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376 
dé 3 
a0 (PAGE 7) 
303 S. DATA PATTERNS 
sey cuseneserere 
i 
| 382 THERE ire, THENTY DATA PATTERN GENERATORS STORED IN CORE 
| 383 F THESE MAY BE SELECTED. THE ONE L'NIQUE 
4 CASES 1s ghee RN ZERO(D): SELECTION OF PATTERN ZERO(O) 
| 85 REQUIRES THAT =f PREVIOUSLY REPARED PAPER TAPE aE 
| 386 ENTERED HIGH SPEED YREADER, THIS TAPE CONTAINS 
| 387 A DATA PATTERN OF NO MORE THAN 377 0 
| 388 CHARACTERS. THE FIRST CHARACTER READ IN IS THE 
| 389 NUMBER OF ACTUAL DATA CHARACTERS THAT ARE CONTAINED 
| 390 ON THE TAPE. ERCH DATA CHARACTER MAY BE ANY 
391 COMBINATION OF BITS AND WILL BE LOADED INTO ORE 
392 AS THEY APPEAR ON NTH HE TAPE. NO MATTER HOW 
| 345 CHARACTERS ARE ON TAPE, THE ENTIRE WRITE BUFFER ep00 CHARACTERS) 
, 394 WILL BE FILLED ae THE PATTERN ENTERED SO THAT ANY 
#35 SIZE RECORD CAN BE U 
327 THE FOLLOWING IS A LIST OF THE DATA FATTERNS AVAILABLE: 
| 398 DATAO: EXTERNAL INPUT THRU HIGH SPEED READER (SEE DTC; MAINDEC-11-DZTUF-A) 
405 DATAl: ALL ONE BITS IN ALL CHARACTERS 
461 DATA2: ALL ZERO BITS IN ALL CHARACTERS 
4p> DATA3: A ONE BIT WALKING FROM RIGHT TO LEFT IN A FIELD OF ZEROS 
403 DATAY: A ZERO BIT WALKING FROM RIGHT TW LEFT IN A FIELD OF ONES. 
404 DATAS: ALTERNATING ONE AND ZERO BITS IN EACH CHARACTER 
40S DATAB: ALTERNATING ZERO AND ONE BITS ‘N EACH CHARACTER 
405 DATA7: SAME AS DATAS BUT WITH EVERY OTHER CHARACTER COMPLEMENTED 
407 DATAIO: SAME AS DATA BUT WITH EVERY OTHER CHARACTER COMPLEMENTED 
uoB DATA1I: INC RENENTING CHARACT ERS (000-377) 
499 ATAL2: DECRE MENTING HARACTERS (377 
410 ATAl3: ALTER TING cheat Te S OF ti ZERO. AND ALL ONE BITS 
411 DATAL4: ALTERNA TERS OF AIL ONE AND ALL ZERO SITS 
413 DATAIS: SPECIAL “PaTIERN. OF A WOKING ZERO BIT REPEATED 4 TIMES 
413 3 DATAl6: IBM CONPAT PATTERN 1 LE 
414 DATA17: IBM COMPAT PATTERN 3 FIXE) (ABCDEF) 
His DATA2D: IBM COMPAT PATTERN 3: FIXED (J) 


me ae es ee ee eee 5 


ee 
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HO.P11 


(PASE 8) 
RANDOMIZATZON 


THERE ARE THREE (3) VALUES THAT MAY r 1 hee, RANDOMLY 

DATA, CHARACTER COUNT, AND RECORD COUN THESE ARE NORMA matLy Y SET TO 
SOME’FiXED VALUE BUT MAY BE RANDOMIZED "ay SETTING THE APPROPRIATE 
CONSOLE SWITCHES. 


A. RANDOM DATA: (CONSOLE SWITCH 8) 
GENERATES AN ENTIRE BUFFER CHARACTER BY 
CHARACTER, OF RANDOM DATA WHEN 
IS SET TO'A ONE. ONCE SET, THE RESETTING OF 
SWITCH 8 CAUSES THE LAST GENERATED PATTERN 
TO BE RETAINED IN CORE. A RESTART AT LOCATION 
200(8) OR 210(8) WILL Gause REVERSION OF THE 
DATA TO THE ee PATTERN REGUESTED INITIALLY. . 
A RESTART AT LOCATION 204(8) WILL HOL 
eis GENERATED PATTERN IN CORE UNTIL-SWITCH 


AGAI 
THOUGH THE DATA IS GENERATED AS RANDOM 
fhe PROGRESSION OF RANDOM CHARACTERS IS ALWAYS 
THE SAME FROM THE OUTSET OF RANDOMIZATION. 
THEREFORE IT Is F PO OSSIBLE TO GEN ERATE one TAPE REEL” 
OF RANDOM DATA ONE UN 
PROGRAM TO RE- EStAGL SH tne Aitees TOOLAT AND 
AD T M TAP REEL ON ANOTHER UNIT FOR 
COMPATABILITY TESTING. EN MULTIDRIVE SySTENS THE SAME 
BLOCK OF DATA, WHETHER RANDOH OR FIXED, IS 
WRITTEN OR READ ON EACH AVAILABLE UNIT IN THE 
ORDER THAT THEY WERE ENTERED. BEFORE BEING CHANGED. 


B. RANDOM CHARACTER ens (CONSOLE SWITCH 7) 
GENERATES A Teneo ENT NUMBER OF CHARACTERS -_ 
ER RECORD TO BE N 


W AC 
BEING CHANGED. RESETTING SWITCH 7 HOLDS THE 
LAST VALUE GENERATED. 


C. RANDOM RECORD COUNT: (CONSOLE SWITCH 6) 
GENERATES A DIFFERENT NUMBER OF RECORDS 
FOR EACH BLOCK OF DAT 


IS WR R READ ON I ORE 
Bele a RESETTING SWITCH & HOLDS LAST VALLE 





KNUNUN OU Oona ul 
Mul © wr-O 
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. DYNAMIC PARAMETERS: 


TY FO ‘ LAST VA 
THAT WERE ENTERED WILL BE PRINTED AS THE STORED VALUES AND MAY 
BE CHANGED BY ENTERING — VALUES OR LEFT UNCHANGED BY 
TYPING A CARRIAGE RETU 


RRELL EER LAL EREE EERE RA LE LEE ELE ELF RELL RARER ELAR ELELERERKALE LR ELE EERALE ELA ERE ELE RELL 


8. hye PROGRAM HAS BEEN MODIFIED TO RUN ON A PROCESSOR WITH OR_ WITHOUT 
A HARDWARE SWITCH REGISTER. WHEN FIRST EXECUTED THE PROGRAM TESTS 
THE EXISTENCE OF A HARDWARE SWITCH REGISTER. IF ‘ad FOUND A 
SOFTWARE SWITCH te Lee (SWREG=LOC. 176 ) IS gt ee TO. 
I EXECU TION THE CONTENTS OF THE SWREG ARE 
DUMPED IN OCTAL ON THE CONSOLE “TTY AND ANY CHANGES ARE REQUESTED 


(TE) SWR=XXXXXX NEW= 
POSSIBLE RESPONSES ARE: 


1. <CR> IF NO cess ARE TO BE MADE 
e. & DIGITS 0-7 TO REPRESENT IN OCTAL THE NEW SuITCH REGISTER 
VALUE ;LAST DIGIT FOLLOWED BY <CR>. 
3. tU TO ALLOW i tee VALUE IF ERROR IS COMMITTED 
KEYING IN SWREG VALUE. 
4. <LF> ONLY VALID FOR ACT-11 SYSTEMS-DO NOT USE 


BUILT INTO THE PROGRAM IS THE ABILITY TO DYNAMICALLY CHANGE THE 

er ay OF SWREG DURIN e PROGRAM EXECUTION. BY STRIKING ¢ 

(CNTL G)_ON CONSOLE TTY THE OPERATOR SETS A REQUEST FLAG TO CHANGE 
THE CONTENTS OF SWREG, WHICH IS PROCESSED IN KEY AREAS OF THE PROGRAM 
CODE (IE) ERROR ROUTINES, AFTER HALTS END OF PASS, AND OTHER 
APPLICABLE AREAS. 


HHELEK ELLE EK EE EEE LE EEA EEE REE EEE EE EERE RARE REE EEE ERE EES EERE EE EEE REE EE EERE LEAR EERE 





= 


TN. ALB 
ZTMAD. 


| 
| 
| 
| 
| 
| 
| 
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MACYI1 27(732) 


(PAGE 10) 
CONSOLE SWITCH SETTINGS 


THE CONSOLE SWITCHES ARE USED TO SET UP THE TEST CYCLE 
DESIRED, TO GENER Ht Rot VALUES, AND TO CONTROL ERROR 
RESPON THE SWIT E’ SET HE DESIRED 


ARE ALL W M_IN ANY 
CONFIGURATION. ALL SWITCHES NseT TO ZERO(O) IS NORMAL. 


SW1S: 1=STOP ON ERROR 
O=CONTINUE ON ERROR 

SW14:  1=YOZ2ZLE ON CURRENT BLOCK 
O=D0 NOT YOZZLE ON BLOCK 

SW13: 1=D0_ NOT CHECK DATA ERRORS 
O=CHECK DATA ERRORS 

SWié: i=DO0_ NOT CHECK WRITE STATUS ERRORS 
O=CHECK WRITE STATUS ERRORS 

SWll: 1=D0 NOT CHECK READ STATUS ERRORS 
O=CHECK READ STATUS ERRORS 

SW10: 1=D0 NOT PRINT ANY ERRORS 


O=PRINT ALL ERRORS 


SW9: 1=REWIND ALL AVAILABLE TAPES 
O=D0 NOT REWIND 


SWB: 1=GENERATE RANDOM DATA 
O=USED FIXED DATA 


SW7: 1=GENERATE RANDOM CHARACTER COUNT 
O=USE FIXED CHARACTER COUNT 


SWE: 1=GENERATE RANDOM RECORD COUNT 
O=USED FIXED RECORD COUNT 


SWS: 1=YOZZLE ON CURRENT RECORD 
O=D0 NOT YOZZ2LE ON RECORD 
SW4: 1=PRINT STATISTICS 


O=D0 NOT PRINT STATISTICS 
SW3: 1=D0 NOT READ 
O=READ 


NOT USED 


SWI: 1=DISABLE WRITE AND READ RETRY OPTION 
O=ENABLE WRITE AND READ RETRY OPTION 


Ty EvERCISER 


VE DATS REL 


ee 8 ee re = eee een One ore re ce ee ee es ee ees = eee eee 
tr oe 
oMS sue 


ori 
et. 
tots 
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’ : (PAGE 11) 
SWITCH EXPLANATION AND EXAMPLES: 


wore ia'as ETA ite. 


ipinep woe ae} 


K TA OD 

HAE Re 0f oF Pe BeCreetS at AT INITIAL START 
5 WILL RP EITHER WRITTEN OR RE VATLABLE 
5c UNIT IN THE ORDER THAT THEY PERE "ENTERED, ATE SEQUENCE 
536 OF OPERATIONS IS CALLED A CYCLE, AND WILL BE PERFORMED 
587 CONTINUOUSLY UNTIL STOPPED BY THE OPERATOR. WHEN END 
Eos OF TAPE IS REACHED, THE UNIT WILL BE REWCUND ANC 
589 FLAGGED AS UNAVAILABLE FOR TEST UNTIL ALL IINITS HAVE 
599 REACHED EOT, AT WHICH TIME TESTING I¢ RcSUMED ON ALL 
53 AVAILABLE UNITS. 
23 EXAMPLES: SWO+SW3 
os A. SWO=0,SW3=1 WRITE ONLY X RECORDS OF Y CHARACTERS 
Eos B. SWO=1'SW3=0 READ ONLY X RECORDS OF Y CHARACTERS 
332 C. SwWO=0;SW3=0 WRITE THEN BACKSPACE AND READ X RECORDS 
=s9 Swi: SWITCH ONE(1), WHEN SET TO A ZERO (0), WILL 
£90 CAUSE ANY DATA RELATED WRITE ERROR TOBE RETRI 
601 - THE RETRY SCHEME CONSISTS OF REWRITING THE RECORD 
er IN THE SAME SPOT ON THE TAPE FOUR (4) TIMES. IF 
£53 ALL FOUR (4) REPEATS ARE SUCCESSFUL, 
£54 IS CONSIDERED RECOVERED, AND A TAPE WRITE 
£05 15 LOGGED. IF ANY OF THE FOUR (4) REPEATS 
£96 1S UNSUCCESSFUL, A WRITE WITH EXTENDED 
£07 INTERECORD GAP IS DONE. A SUSPECTED BAD TAPE 
£08 SPOT LOGGED AT THIS BLOCK AND RECORD NUMBER, 
£593 AND A SECOND RETRY OF FOUR REPEATS IS DONE 
610 IF AFTER FOUR (4) RETRIES, THE RECORD CANNOT 
611 BE RECOVERED A NOTIFICATION IS PRINTED, AND 
12 TESTING IS RESUMED ON THE NEXT RECORD. 
£13 IF 20(8) BAD T TS ARE FOUND, THE UNIT 
£15 WILL BE FROM TESTING WITH 
bis AN APPROPRIATE MESSAGE PRINTED 
617 ITCH One T TO A ZERO (0), WILL ALSO 
£18 ANY Dat Ta’ RELATE BY ED. READ ERROR TO BE RETRIED. 
615 THE RE QF REREADING THE RECORD 
£20 ARAXINUM OF EGR su} a STs IF THE RECORD IS 
$21 SUCCESSFULLY REC OVERED ON ON ANY OF THE REREADS 
bee IT IS CONSIDERED FOR S TISTICS PURPOSES 70 BE 
623 A SOFT READ ERROR AND Test ING CONTINUES IF THE 
624 REREADS FAIL TO RECOVER HE RECORD, THE ERROR 
bes IS LOGGED AS A HARD RE 
627 Su4: SWITCH FOUR (4) WHEN SET WILL PRINT THE 
£28 STATISTICS GATHERED FOR EACH UNIT. THE NUMBER 


WILL BE PRINTED AT THE END OF A BLOCK CYCLE. 
SEE ITEM 10, PAGE 20 FOR FULL DETAILS. 
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7 


SWé-8: 


SWS: 


SW10-13: 
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SWITCH FIVE (5) WHEN SET DURING A_READ 

OPERATION WILL CAUSE THE PROGRAM TO 

tds ae t's iL na aie RECORD BY 
RECORD AND 


Y 
TO THE BRINTED + WITH A i (§) 


TOA VALUE OF 1600 1h THe 


OF PROGRRA T 
PREVENT EXCESSIVE TAPE WEAR Y BE 
SET BT hiv VALUE THRONGH THE SELEY eNPE. 


THESE THREE (3) gg th ay THE RANDOMIZATION 


fio RESET AT ANY TYRE. THE ACTURL CHANGE 
WILL TAKE PLACE BETWEEN BLOCK CYCLES. 


SWITCH NINE (9) WHEN aT WILL CAUSE ALL 
AVAILABLE TAPE UNITS TO BE REWOUND AT 
THE ENO OF THE CURRENT BLOCK CYCLE. TESTING 


OnE) i REN ACL UNITS HAVE.” REACHED BOT. 


THESE SWITCHES ARE USED TO CONTROL THE 
eat BOLING TO -pe DONE oN HE TAPE 
ERATION DESCRIBED BY SWITCHES O+3. 

SWITCH TEN (10) WHEN SET TO A 


ONE 
WILL DISALLOW ANY ERROR PRINTOUTS MADE 
ON ai: OPERATION IN OTe BRTITT ancae 


IN 
STILL OCCUR. IE: UNIT NOT AVAILABLE ILLEGAL 
BOT, DROP OR PICK OVERFLOW, AND EOT REWIND 


SWITCH ELEVEN (11) WHEN SET TO & ONE 
WILL DI ar ten THE CHECKING FOR STATUS 
ERRORS ON READ OPERATIONS. 


SWITCH TWELVE (12) WHEN SET TO A ONE 
WILL DISALLOW THE CHECKING FOR STATUS 
ERRORS ON WRITE OPERATIONS. 


SWITCH THIRTEEN (13) WHEN SET TO A ONE 
WILL DISALLOW THE CHECKING OF READ 
ATA. THIS SWITCH HAS NO EFFECT ON 

STATUS CHECKING. 








r ee ee ee 6 a eee + 
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530 SW14: SWITCH FOURTEEN (14) IS USED DURING A 

691 READ ONLY OPERATION; WHEN SET, THE 
| 682 BLOCK OF DATA BEING READ WILL CONTINUOUSLY 
| -§93 BE READ aNd SPACED OVER SO THAT TAFE WILL 
| 634 REMAIN AT THE SANE BLOCK. WHEN RESET, THE 
| est TAPE WILL BE ALLOWED TO MOVE FORWARD AND DATA 
| 696 BLOCKS WILL BE READ PROGRESSIVELY. 

bs: THIS 1S A BLOCK YOZZLE. 

£55 SUIS: SUITCH F FIFTEEN 15) DMHEN SET TO A ONE, 
| 700 WILL C 0 HALT 

? ERROR SeFECT ED BY oe oPeRAT ON_IN PROGRESS. 
tat Te 80TH TEN (10) AND FIFTEEN (15) 
| 703 UAL ERROR DETECTED WILL 
eee Nor BE Tap it AC gure WILL CAUSE A HALT. 
i = 70S IF SWITCH TEN (10) I5 RESET BEFORE PRESSING 
| 208 CONTINUE, THE ERROR WHICH CAUSED THE HA 
| WILL BE PRINTED BEFORE TESTING 1S RESUMED. 
‘Sali Sie 





r eon ree 
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rig 9. ERROR PRINTOUTS 
Se ae ee ene fae ge 
| 91g THERE ARE THREE TYPES OF ERROR PRINTOUTS MADE BY 
18 THE PROGRAM: OPERATION. ERRORS DATA R ERRORS BND CONDITION 
ai SE AOEe. wie CONTAINS NS ; GE PRINTED I IS PRECEDE DUNT mu ER, 
sig BAD RECORD NUMBER BR ie NT unpre eee oF BLO SIZE 0 
720 RECORD, AND TYPE OF SPERATION WHICH CAUSED ERROR. 
zee A. OPERATION ERRORS: 
Taz; THESE ARE ERRORS WHICH CAN OCCUR AS A DIRECT 
| 725 RESULT OF A TAPE OPERATION. 
| 1. READ/WRITE STATUS ERRORS: 1 ARE INDICATED BY THE ERROR BIT 
| 728 tBTY 15) “oF Tie are Contes REC IETER 
730 
| 73} 2. RECORD LENGTH ERRORS: THESE ARE INDICATED BY A BYTE COUNT 
| 738 OTHER THAN ZERO (0) OR AN INCOR RECT 
733 CURRENT MEMORY ADDRESS OR BOTH 
ae 
fod , 3. TAPE POSITIONING ERRORS: ICAT A SPACE 
: 538 cOunT 6 Ones THAN Fen G), NO BOT FOUND 
| 738 a RENIIND OR NO UNIT 
| 233 READY AT THE END OF REMINDS 
oa B. DATA ERRORS: 
| 72 DATA ERRORS WILL OCCUR WHEN TAPE IS 
| 74M BEING READ AND THE DATA DOES NOT MATCH 
| ois THE EXPECTED DATA. 
747 BECAUSE DATA RECORDS CAN BE UP TO TWO THOUSAND 
74g CHARACTERS LONG, AN ERROR CONDITION WHICH WILL CAUSE 
78 THE ENTIRE RECORD TO READ INCORRECTLY COULD CAUSE A VERY 
750 LENGTHY PRINTOUT. THEREFORE, A COUNTER OF SUCCESSIVE 
751 TERS I OYED. "IF TEN (10) CHARAC 
752 IN SUCCESSION ARE A NOTIFICATION IS PRINTED 
753 (BAD RECORD) AND THE NEXT TWENTY (20) CHARACTERS 
754 ARE SKIPPED BEFORE CHECKING IS RESUMED. IF THE BAD 
755 RECORD CONDITION OCCURS THREE (3) TIMES IN ONE 
756 RECORD, THE REST OF THE RECORD IS SKIPPED, DOWN 
757 TO THE LAST TEN (10) CHARACTERS, WHICH WILL BE 
752 CHECKED. THE SKIPPING AND RESUMPTION OF CHECKING WILL 
759 ONLY BE DONE ON RECORDS WHICH ARE LONG ENOUGH 
769 TO ALLOW IT. 


a cake clin Se cacehaobees oe edad 
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765 C. CONDITION ERRORS: THESE ERRORS REFLECT THE STATE OF THE TAPE 
cee SYSTEMBEFORE AND AFTER AN OPERATION. 

768 1. EOT: WHEN AN eet cee yf wee IS ENCOUNTERED DURING 
783 EITHER A READ OR_A WRITE, THAT UNIT IS FLAGGED AS 
7:0 UNAVA TLABLE FOR TESTING AND IS REWOUND UNTIL ALL 


AVAILABLE UNITS HAVE REACHED Bote AT WHICH TIME 
TESTING IS ORESUNED ON ALL AVAILABLE UNITS. 


7} 

ang 

774 2. ILLEGAL BOT: alten A UNIT ENCOUNTERS BEGINNING OF TAPE (BOT) 
775 DURING A READ OPERATION THE ERR 

778 PRINTED AND THE UNIT DROPPED FROM TESTING 

eh UNTIL ALL ARE RESTARTED ON THE NEXT PASS. 

773 
780 


we ce cee 


3. DROP DRIVE: UNIT BECOMES Py te ge DUE TO LOSE OF SELECT REMOTE, 
BOT DURING REWIND NO TUR WHEN MAKING INITIAL SELECTION 
781 - UNIT IS DROPPED, Star rerice PRINTED, TESTING WILL RESUME 
ree AT BEGINNING OF NEXT PASS. 
va-n 
785 4. CONTROLLER NOT READY: BEFORE ANY OPERATION IS rere THE CONTROLLE 
785 IS CHECKED FOR READY. IF IT IS NOT READY 
1h ERROR WILL BE PRINTED AND THE PROGRAM WIL oTOP. 
7893 5. NO INTERRUPT RETURNED: ie TAPE OPERATION SHOULD BE TERMINATED BY 
739 SETTING AN INTERRUPT IN THE CPU. N 
731 INTERRUPT IS RETURNED WITHIN THE APPROPIATE 
a TIME, AN ERROR IS PRINTED. 
t 
734 
735 6. NO MORE UNITS TO TEST: IF ALL UNITS HAVE BEEN DROPPED 
oa FOR CATASTROPHIC ERRORS, THE PROGRAM WILL STOP. 
| 7g 
739 E. EXAMPLES: 
B90 
801 GLOSSARY: +f = BLOCK 
B0e eas NUMBER (X) OF A TOTAL OF (Y) 
B03 Re = C ante IN CHARACTERS PER RECCRD 
£04 WE = WRITE 
eos RE = READ ERROR 
Boe 7-3 SPACE ERROR 
B08 CR < COMMAND REGISTER 
609 CS = STATUS REGISTER 


WC = BYTE COUNTER 

7° Pert MEMORY ADDRESS POINTER AND EXPECTED VALUE 
G = GOOD DATA (SHOWN IN BIT FORMAT AS IN CORE) 

B = BAD DATA sR LET gt As AS IN CORE) 


on R AMT = NUMBER LEFT 
= TAPE MARK (OFTEN CALLED EOF FOR END OF FILE) 
[pc = LONGITUDINAL PARITY CHECK (RECEIVED - EXPECTED) 


MWMMOMOwwwowo 
2 0 0 ee 
NOW COIMUeO 
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18 PATTRN = DATA PATTERN (R=RANDOM) 
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™: 
+ 
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SOEs 


coo0o 
fru 
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EXAMPLE 1 


EXAMPLE 1: IN THIS EXAMPLE A TAPE_VERTICAL a A we 

has a Ay eae a . ‘af it ve THE 
TWELVTH (12) RECORD THE” HOR 
COUNT AND CURRENT RENORY HROBRESS. ARE CORRECT. 
THE RETRY OPTION WAS DISABLED. 


UNIT we 3 #DEN 1 *PAR O *PATTRN 1 
BN 4OE#RN le-200#RS 2000*WE 

COMD To10001111 000100 

pial 01500001 800001 


cA 14436-14436 


FT 
THe BLOCK” THE RETRY OPTION WAS DISABLED. THE 
T OF 20 CHARACTERS 


W 0 ER 
LEFT TO BE TRANSFERRED. THE pret MEMORY 
ADDRESS REFLECTS THAT A SHORTAGE OF 20 
“eg Mie S pe Eee HAD OCCURRED. IN 


-) MMAND 
REGISTERS DO NOT SHOW ANY ERROR, BUT 
THE LPC IS SHOWN TO BE INCORRECT. 


UNIT NO. 7 #DEN 2 #PAR 0 *PATTRN 6 
BN 10*RN 1-100#RS SO#RE Fuex 

eo 0100011111000100 

STAT 0000000001000001 


WC Mt 
CA 12466-12506 
LPC 337 -147 


EXAMPLE 3 


EXAMPLE 3: IN THIS EXAMPLE THE TAPE UNIT WAS TRYING 
TO SPACE OVER THE 15 RECORDS IN 
N ORDER TO ESTABLISH PROPER 
READING. 


RMINATED 

15 pag B eee TRAVERSED 
AND RROR SHOWN BECAUSE THE TAPE IS 
NOT IN PROPER POSITION 70 BEGIN READING. 


UNIT NO. O *PATTRN R 
BN 2#RN 15-15#RS 23 *SE 
ERR AMT 4 


a ee ee en ee - + ee 
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878 
879 EXAMPLE 4 
Se ee ae eg as he ts. cay er eee 
|  gg5 EXAMPLE 4: IN THIS EXAMPLE UNIT NUMBER ONE a HeQ SEEN 
883 REWOUND VIA CONSOLE SWITCH NINE (9) AND AT THE 
B64 COMPLETION OF THE OPERATION BOT WAS NOT SET IN 
ess THE STATUS REGISTER. 
887 UNIT NO. 1 ¥DEN 3 #PAR O #PATTRN R 
gg8 BN 3002#RN 65-65*RS 10 
89 NO BOT ON REWIND-HALT 
| gg) EXAMPLE 5 
| Bas a ings 
i 
1 gay EXAMPLE 5: IN THIS EXAMPLE TWO BAD CHARACTERS WERE 
B95 READ FROM TAPE IN THE FORWARD 
36 THE FIRST (0) AND THE THIRTEENTH (13) CHARACTERS 
897 OF THE TOTAL NU OF SIXTEEN (16) GHARACTERS 
| 998 IN, THe BLOCK ARE BAD. CHARACTE 
999 OP tOs HES DROPPED BIT NUMSER FIVE f2) AND 
| 909 SEO ACTER NUMBER THELVE (12) HAS PICKED UP 
| 301 BIT NUMBER SEVEN (7). 
/ 903 UNIT_NO. 5 *DEN 3 #PAR O ¥#*PATTRN S 
| goy BN 12*RN 3-10#RS 1S*DE-F#x 
| gos CN O 
| 906 6; 10101010 
| ag7 B: 10001010 
| 808 Ch 12 
'  §o9 6; 01010101 
| §16 B: 11010101 
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$14 EXAMPLE 6 
Be i eae Pate Awe ey RC ne 
$17 EXANPLE 6: IN THIS EXAMPLE UNIT NUMBER SIX (6) HAS 
918 REACHED END OF TAPE (GOT) FOR THE 1ST TIME AND WILL BE RENCUND. 
919 TESTING WILL RESTART ON UNIT NUMBER SIX 
320 WHEN ALL UNITS HAVE REACHED EOT. 
g32 UNIT NO. 6 ¥DEN 3 ¥PAR O ¥#PATTRN R 
333 BN 677 #RN 25-600%RS 1566 
954 EOT NO. 
935 UNIT WILL REWIND AND BE 
935 RESTARTED ON BLOCK ONE 
| $27 WHEN ALL AVAIL UNITS REACH EOT 
| 939 EXAMPLE 7 
RE Ge ee as eT ie eS ere: 
835 EXAMPLE 7: IN THIS EXAMPLE UNIT NUMBER TWO (2) HAS 
635 ~ ENCOUNTERED BEGINNING OF TAPE (BOT). ORIVE WILL BE DROPPED 
§34 STATISTICS WILL BE PRINTED, TESTING RESUMED 
| $3 AT BEGINNING OF NEXT PASS. 
| 337 UNIT NO. 2 ¥DEN 2 #PAR O ¥*PATTRN 2 
| 332 BN SG#RN 2-4xRS 1200 
$3 ILLEGAL BOT 
| gui EXAMPLE 8 
oo ee 
(344 EXGMPLE 8: IN THIS EXAMPLE THE SELECTED UNIT (NUMBER 0) 
| gus HAS BECOME UNAVAILABLE.UNIT WILL BE DROPPED 
| guB STATISTICS WILL BE PRINTED, TESTING WILL RESUME AT 
| #2 BEGINNING OF NEXT PASS. 
| 49 UNIT NO. 3 xDEN_1 PAR 0. xPATTRN 4 
| sp BN 1*RN O-200%RS 66 NOT 
$s (OR LOST SELECT REMOTE, NO OT ON REWIND) 
| @53 EXAMPLE 9 
2@ Gee ee ee, 2 Seen 
acE EXAMPLE 9: IN THIS EXAMPLE THE WRITE OPERATION EXECUTED ON 
957 UNIT NUMBER SIX (6) WAS NOT COMPLETED AND NO 
$58 INTERRUPT WAS RETURNED: 
860 UNIT NO. 6 ¥DEN 2 *PAR O ¥*PATTRN R 


i el BN 12*RN 3-4*RS 1O0*WE 
| NO INTERRUPT RFTURNZD 


ae eee ee ee 
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S64 
S65 EXAMPLE 10 
Tey ne er ieee ey i ae 
S68 EXANPLE: 10, THIS EXAMPLE SHOWS A READ ERROR WHICH 
369 OVERED ON i Se I 
? ERROR WILL BE LOGGED AS A KOLAR BUT WILL BE 
rat CATEGORIZED RROR. THE REGISTERS 
Pm SHON A PARITY ERROR WAS THE CAUSE OF THE ERROR. ‘ 
974 UNIT NO. 1 XDEN 3 xPAR 1 *PATTRN R 
75 #RN 2-100 ARS 1117 #RE Fees 
a0 ¢ 2 Aaieapbai Boo ay 
879 pC 337- 
age SaSORIGINAL ERROR### 
982 
983 UNIT NO. 1 DEN 3 ¥PAR O xPGTTRN R 
es4 BN 10 #RN 2-100 *RS 1117 ¥RE Feex 
g8 COMD 11101001 10000010 a 
a6 STAT 0011000001000001 
987 WiC O 
959 LPC 337- t ‘ 
gg9 , READ FAILED--RETRY: 1 ; 
$30 f REREAD SUCCESSFUL--RETRY: 2 . a rat 
: v} 
992 EXAMPLE 11 
oe ha Mi ane oe es 
995 EXAMPLE 11: | THIS EXAMPLE SHOWS A WRITE ERROR WHICH 
S96 WAS NOT RECOVERED BY SUCCESSFULLY REWRITTING 
997 THE RECORD FOUR TIMES AT T E 
998 ORD WAS SUCCESSFULLY WRITTEN AFTER 3 
999 INCHES OF TAPE WAS ERASED. 
1009 WILL BE LOGGED AS A BAD TAPE SPOT. 
1002 UNIT.NO, 0. DEN 3 #PAR 0. XPATTRN 
1003 BN 2 #RN 370 -4o1 #RS C407 HWE 
1004 ono 11 1000001000010 
1005 STAT 0011000001000001 
1006 lic 
1007 CA 25613 -25613 
1908 #4*0RIGINAL ERRORHH 
1910 UNIT NO, 0.8DEN 3 PAR OQ. sPATTRN R 
igi #RN 370 -461 *RS 2407 #NE 
101 com’ 1110000010000100 
1013 STAT 0011000001000001 
ibis Ch 25613 -2Sb1 
ible icbect Bad TAPE 
1017 RETRY: 0 
1018 REPEAT: O 
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BASIS. DROPS ARE COLLECTED DURING THE DATA 

CHECK ROUTINE. 

PICKS: THE NUMBER OF BITS PICKED ON A PER TRACK 
BASIS. DROPS ARE COLLECTED DURING THE DATA 
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1853 é 
1054 10. STATISTICS PRINTOUT 
Fe ee acme 
| 305? THE PROGRAM GATHERS A VARIETY OF STATISTICS DURING 
158 THE COURSE OF 17S TESTING, THE STATISTICS ARE KEPT 
1038 ON 8 UNIT BY UNIT BASIS Rip ARE SUMMARIZED IN 9 
1050 STATISTICS PRINTOUT, © STATISTIC PRINTOUTS CAN BE 
1031 END OF EACH BLOCK CYCLE BY SETTING 
1052 CLITGH FOUR (9). 10-1, A STATISTIC PRINTOUT Ie AUTOMATICALLY 
ins PRINTED WHEN A UNIT REACHES EOT ANO IS REWOUND. 
103s HERE IS AN EXPLANATION OF THE STATISTIC SUMMARY. 
| 3037 DROPS: THE NUMBER OF BITS DROPPED ON A PER TRACK 
CHECK’ ROUTINE. 

| UTERR: OF RECORDS IN WHICH A MRITE ERROR 

| OCCURRED. IF WRITE RETRY WAS ENABLED, WTERR 

| MILL CONTAIN ONY 


THOSE RECS WHICH’ WERE 
T RECOVERED AFTER ONE RETRY 


RTRY: THE NUMBER OF RETRIES INITIATED UNDER THE 
WRITE RETRY OPTION. (SEE ITEM 8., SW1:) 


ROERR: THE TOTAL NUMBER OF RECORDS IN WHICH A 
READ ERROR OCCURRED. 


SOFT: THE NUMBER OF READ ERRORS WHICH WERE 
RECOVERED 


REREADS 

OPTION. (SEE ITEM 8.. SW1:) 

seNOTES SOFT READ ERRORS ARE ONLY CATEGORIZED 
THOSE READ ERRORS OCCURRING WHEN CONSOLE 

SAR TCH 1 IS SET T0 ZERO. 


HAFD: THE NUMBER OF READ ERRORS WHICH REMAINED 
UNRECOVERED UNDER THE READ RETRY SCHEME. 
(SEE ITEM 8., SwWi:) 
##NOTE: HARD READ ERRORS ARE ONLY CATEGORIZED 
FOR THOSE READ ERRORS OCCURRING WHEN CONSOLE 
SWITCH 1 IS SET TO ZERO. 


DOTERR: THE NUMBER Ay DATA ERRORS FOUND FOR THIS UNIT. 
##NOTE: DATA ERRORS ARE ONLY FOUND FOR THO 
BECSRUS WHICH WERE READ WITH SWITCH 11 RESET TO 


JRALLRERRK RR RR ES CrP Pe eer aBLE 


Biss 


" eee aie ee re ce | ee rt a es es eee eee - 
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1077 BAD TAPE SPOTS: A COUNT OF THE NUMBER OF TAPE SPOTS 
| 1078 WHERE @ RECORD COULD NOT GE REWRITTEN SUCCESSFULLY 
| 1079 E RETRY OPTION (SEE ITEMG. » Sil: 
| 3089 FOLLOWING fre COUNT IS A List 
| 981 LOCATIONS IDENTIFIED BY THE BLOCK AN RECORD NUMBER 
| ioe WHEN THE BAD TAPE SPOT WAS LOGGED. 
| 1084 EXAMPLE 
Cie | AP ae pia eee Acad a. Ce ace So aR ce 
| 1086 props: 00007000 
1087 Picks: QO020000 
| 1088 WIERR: 3 
| 1089 RTRY: 4 
| 1090 RDERR: 6 
| 308r SOFT: 1 
| 3065 : § 
| 1033 DTERR: _10 
| 7064 1 BAD TAPE SPOTS 
| 108s 0 #BN 16 + 
t 


ne me ee ee ee oe ee ee eee 
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il. AUTO SEQUENCE 


THE 
OPERATOR RESPONSE REGUIEED 1S 10 ThE. TYPED ReGlEs fe ote 


FOR THE CONTROLLER CORT THIGOG oR 
SINGLE CYCLE. ALL SurTeHeS REMAIN Bc ACT rive AND MAY 

JSED Ni ORMALLY; HOWEVER INTENT IS TO LEAVE ce SWITCHES 
DOWN AND ALLOW FULL ‘EREcuTTON OF THE TEST PLAN FOR 

SYSTEM CHECKOUT. 


SAMPLE START AT 240(8): AUTO SEQUENCE 
LOAD ADDRESS 240(8), SET SWITCHES TO ZERO, PRESS START: 


™M,A,B-11 AUTO SEQUENCE TEST 
ENTER RESPONSES IN OCTAL 


REGISTER START = 172520 (CR) 
VECTOR = 224 (CR) 
AUTO CONT: O (1) 


THIS EXAMPLE 7 AN AUTO SEQUENCE START WITH .-* CONTROLLER 
AT BUS ADDRESS 1 AND A VECTOR OR 224. ALL AVAILABLE 
UNITS WILL BE 1853 CONTINUOUSLY. 


AS EACH PASS IS COMPLETED A oiviteR LINE OF ASTERISKS 
WILL BE PRINTED FOLLOWED BY AN END OF PASS MESSAGE 
{ICR ING HOW MANY PASSES oy * BEEN COMPLETED SINCE 
GUN. AT THE START OF EACH 
PASS THE UNITS BEING TESTED ARE PRINTED. 


AUT® SEQUENCE TEST PLAN: 

THE AUTO SEQUENCER WILL EXECUTE A PASS CONSISTING OF 

THE WRITING TREBOING AND CHECKING OF SEVERAL 

DIFFERENT PATTERNS. EACH PASS WILL START AT BOT 

AND PROCES an ENTIRE MAG TAPE BEFORE REWINDING 

THE UNITS WILL BE SET UP TO WRITE 800 BPI IN NINE 
RACK FORMAT. ODD PARITY WILL BE USED AND NO 

Tepe MARKS WILL BE WRITTEN. 

THE DATA PATTERNS WILL BE AS FOLLOWS: 

THREE FIXED DATA PATTERNS: 


EACH PATTERN WILL BE USED FOR SIX BLOCKS. 
EACH BLOCK CONSISTS OF (100) 4000 CHARACTER RECORDS. 


~ 
QO 
0 
| 


oe Nala atetet ti 


OD ITU EW ODD TOU E eatoe 


j 
' 
| 
' 
{ 


0 = 0 &= & + <b 0-= bo = b+ & 0 8 BF b= Bb 8 b= 0-2 0-2 2 B-* b= B+ b+ b= 8-2 b 2 0 = 2&2 8-2 b2 b-2 B= 0-2 8-0 & 2 8 b= ho b= 6 2h =H -2 6-2 §-28-< B02 BH 
0 0 -+ b= 0+ b+ 6 -< © + 0 0 = 6 0-- b= & + 6 § = 0 -< B+ B-2 = = B+ 0-2 b+ B+ b+ 2 9 - 0-2 + § 2 0 -* B22 OF 2 b2 § 2 B~0 B-+ B02 09-2 o 


OS VFN E OV SHBVRA Le es VOU Looe eo 


TTERN 3 WALKING ONE SIT 
TTERN ALTERNATING ONE AND ZERO BITS 
PATTERN ti: INCREMENTING CHARACTERS (000-377) 





be 


Sin 


raed 
+ 


fur Coto aOrUT ee coke 


0-- 0 » © & +0 0 = © b-< 9 p= 9 9 p> 
0-+0 <0 +6 +0 -< 6-9 -< 6~< 9 6 


wo 
££) 





FOLLOWING THE FIXED DATA PATTERNS, RANDOM 
DATA WILL BE WRITTEN IN THE SAME BLOCK STRUCTURE 
UNTIL EOT 1S RER CHED. . 
A OP TET CTENT LENGTH TO MECORDDATE ALL OF 
4 
fe Er seh “Date PATTER AND AT LEAST ONE 
CORD OF HERWISE, THE TAPE WILL 
cE SE LOUND NEL itt fig” THE DATA PATTERNS 
HAVE BEEN TESTED, 


¢ 
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(PAGE 23) | 
RANDOM DATA: 


| 
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1165 {PAGE 24) 
115§ 5S 
118; 12. TESTING PROCEDURES 
HO aes ge. eae er 
1179 AS PREVIOUSLY STATED THIS PROGRAM CONTA NS_NO 
1171 FIXED TESTS. THE ENTIRE TEST CYCLE TO BE EXECUTED 
Ee a ee ie tea 
1375 cEGETNEE FOR SPeRATTON. THE OPERATION SELECTED WILL 
iit Bh EAEACAPAILABLE CHIT ONE BOCK Af Rorite UNeTee 
tis gt OBPED BY 3 OPE thy ONE OPERATION MAY BE CHANGED 
1178 ICALLY BY CHANGING CONSOLE SWITCHES AT ANY 
1178 TIME. THE PROGRAM WILL ATTEMPT TO PERFORM ANY OPERATION 
118 SET AND THEREFORE CAUTION SHOULD BE TAKEN TO ASSURE THAT 
1181 THE UNIT IS CAPABLE OF PERFORMING AS REQUESTED. FOR 
i182 INSTANCE SHOULD NOT ATTEMPT TO PE READ OPERATIONS 
i183 ON A TAPE WHICH HAS NOT BEEN WRITTEN AS THE DATA, IF ANY 
1184 IS UNPREDICTABLE. HOWEVER. IF A TAPE HAS BEEN WRITTEN WITH 
1185 THIS PROGRAM, IT CAN BE READ AS OFTEN AS DESIRED WITHOUT 
1186 BEING REWRITTEN. THIS IS A GOOD PROCEDURE TO USE FOR 
1187 TESTING TAPE C MPATABILITY Res Sean OF TAPE UNITS BECOMES 
1188 SIMPLE; BY SETTING THE DESIRED OPERATION AND ITS PARAMETER, 
1188 A UNIT MAY BE CONTINUOUSLY EXERCISED IN ANY MANNER DESIRED. 
1150 BY USING THE VARIOUS ERROR CONTROL SWITCHES AND ENTERING 
1181 THE NEEDED STALL, ANY FUNCTION CAN BE SCOPED RATHER 
1192 EASILY. RELIABILITY TESTING CAN BE PREFORMED BY USE 
1193 OF THE RANDOMIZATION CAPABILITY. PERHAPS A CYCLE OF 
1194 RANDOM TESTING MIGHT BE SET UP AND ALLOWED TO RUN 
1195 FOR SOME PERIOD OF TIME, THE STATISTICAL COLLECTION 
11% OF DROPS AND PICKS IS THEN SIGNIFICANT. INTERMITTANT 
1197 PROBLEMS CAN BE FOUND BY SETTING THE DESIRED OPERATIO 
1198 IN MOTION AND DISALLOWING ERROR PRINTOUTS WHILE ALLOWING 
1199 A HALT ON ERROR. THE ERROR THAT CAUSED T CAN 
1200 BE PRINTED BY RESETTING CONSOLE SWITCH TEN AND PRESSING 
1201 CONTINUE. IF SOME PARTICULAR DATA PATTERN SHOULD BE 
1202 CAUSING DATA ERROR, USE OF THE YOZZLE SWITCH ITS 
1203 BSSOCIAT STALL CAN BE USED TO ALLOW SCOPING OF THIS 
1208 PARTI CORD. 
1206 AS YOU SEE, THERE ARE MYRIAD TESTING PROCEDURES WHICH 
1207 COULD BE PERFORMED. THE PARAMETERS, TAPE OPERATIONS, ERROR 
1608 EXAMINATION AND REPORTING ARE ALL At YOUR DISCRETION: 
1210 TRY IT, YOU'LL LIKE IT. 
ele 13. LISTING 
isis SEE: 
1215 TITLE ™,A,8-11 TSO3 OR TU1O,N,W MULTIDRIVE DATA RELIABILITY EXERCISER 
126 *MAINDEC-1 1-DZTMH-D-D 
121 AUG 1976 | 
1218 'R. 8. BARNES/RON PLATUKIS/R. SOLER < 
1219 "ENABLE ABS, AMA 4 
1220 “MCALL .SACTII > 








TM.A,B-11 TSU3 OR TLIO,N.W MULTIDRIVE DATA RELIABILITY EXERCISER MACYLL 27(732) 
DZtMAD.Pi2 
1221 
iscs sCONSOLE SWITCHES#eeexeeeexse 
1224 SiS: L=STOP ON ERROR 
1285 O=CONTINUE ON ERROR 
| 1337 Si 1sYOZZLE ON CURRENT BLOCK 
1228 O=D0 NOT YOZZLE ON BLOCK 
1230 preiegy 1=D0 NOT CHECK DATA 
1e31 : O=CHECK DATA 
1233 sSW12: 12D0 NOT CHECK WRITE ERRORS 
es : =CHECK WRITE ERRORS 
| $336 sSW11: 1=2D0 NOT CHECK READ ERRORS 
1237 : O=CHECK READ ERRORS 
i p39 ;SW10: 1=D0 NOT PRINT ERRORS 
1240 : O=PRINT ERRORS 
1e42 :SW9: 1=REWIND TAPE 
isi : O=D0 NOT REWIND 
«Bas :SW8: 1=USE RANDOM DATA 
| 1846 : =USE FIXED DATA PATTERN 
| Bye SU? Keli M CHARACTER COUNT 
ies : O= D CHAR COUNT 
| 1251 :SW6: 1=USE RANDOM RECORD COUNT 
1258 : LOSE FIXED RECORD COUNT 
«e84 SWS 1=YOZ7LE ON CURRENT RECORD 
a ze : O=D0 NOT YOZZLE ON RECORD 
| 1257 ;SW4: 1=PRINT DROPS AND PICKS 
«1B : O=D0 NOT PRINT DROPS AND PICKS 
1260 ;SW3: 1=D0 NOT READ FORWARD 
«16 : O=READ FORWARD 
o ue; NOT USE 
1265 sSil: 1=INHIBIT WRITE AND READ RETRY - 
1268 : O=ENABLE WRITE AND READ RETRY 
1268 sSUO: 1200 NOT WRITE 
1269 : O=WRITE 
1270 
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DZtMAD.Pi1 


127 

Fe REGISTER EQUI VSeeeeeeeenees 

1274 ocooge RO=%0 

le7s 360091 Ried 

1s¢ late RSos5 

1278 999004 R4Y=“4 

12793 ocogos R5=45 

1280 0956 SP=4%6 

1281 909987 PC=%7 

128e 909240 NOP=240 

ise? : TRAP CATCHERS #44 4e£ 444% 

1286 poco00 20 

1287 po0042 * 242 

1e8e .SBTTL ACTI1 HOOKS 

1299 © SHELF LKE LEER ELA ZELLER RELL FLA E SEL E KLEE FLEA ELALEEFLFELESLSEKFEELEEE 

1291 HOOKS REQUIRED BY ACT1 

Lege oooo42 - $SV veCs. sSAVE PC 

1294 o0C046 OO4ESO SENDAD ::1)SET LOC.46 TO ADDRESS OF SENDAD IN .SEOP 
oo0052 =S2 


o0co52 000000 “WORD O 9 32)SET os * TO ZERO 
000042 - =$SVPC 33 RESTORE 
;TTY INTERRUPT VECTORSk##x#x4e% 


.=60 
ptant sTTY INTERRUPT HANDLER ADDRESS 


sSOFTWARE SWITCH REGISTER LOCATIONS#axeeexx% 


SREHateteicteteaeet ah 
28 
oe 


= b+ 0-2 b <0 B+ B= 6 Bb b= = 2 Bh — 0-2 hh 1 2 = & 0d 2 He 


000174 2174 
303 000174 oc00c00 DISPREG:0 
ay 000176 909000 SWREG: O 
ais sSTART ADDRESS#xeeexxeee 
a4 ppg209 ,=200 
st ooo200 0137 002772 jmp START ;ENTER PARAMETERS VIA TTY 
317 000204 =204 
218 000204 9000137 003124 Imp TARTA ;USE FIXED PARAMETERS; HOLD DATA 
320 .=210 
3ei 000210 005037 013304 CHAIN: CLR ROFL 
a56 000214 600137 903142 JMP STARTE ;USE FIXED PARAMETERS; NEW DATA 


me ee ee ee. ee ee eee 


ws 
wo 
es 


Rid 


uuaRRRi 2 


+ + 6-0 -< &—< 6 6 p= & = 9 9 po 


ee ee ee nn mm re es oe rr rr ee ee ee eee wwe. 





7503 OR Tu10,N 
ACTI1 HO 


P ve MULTIDRIVE DATA RELIABILITY EXERCISER MACYI1 27(732) O4-NOV-76 11:29 PAGE 3 
HOOKS 


. 


> 2-2 


1 


;MAG TAPE INTERRUPT VECTORS###xee44% 


oo0ee4 2224 
popes. 01746 TINT ;MAG TAPE INTERRUPT HANDLER ADDRESS 
CO0ze& 00034 340 
sAUTO SEQUENCE START##eexexeee 
oo024o .=240 ° 
900240 OUSe3s” O21s24 INC ASEQF ;SET_SUTO SEQUENCE FLAG 
000244 000137 9003106 JMP STAUT ‘ ;GQ0 TO START OF AUTO SEG 


mm a en ae +e ne ee oe 


ee ee 
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o-4 
Ee 
— 


M.A, B11 TSO3 OR TULO,N 
MHD. P11 ACTLIL HOOKS 

13 000600 2600 

: + CONSTANTS + #x##x# x 

1334 900609 172520 MTS: 172520 sTAPE STATUS REGISTER 

1339 OO0E02 172522 MTC: 172522 TAPE COMMOND REGISTER 

1340 SOON 72504 MWC: 172524 i TAPE CHARACTER COUNT REGISTER 
1341 000606 172526 MDA: 172526 TAPE DATA RODRESS REGISTER 

1348 000610 172530 MTD: 172530 ; TAPE DATA BUFFER 

1343 O006le 172532 MTRD: 170532 TAPE READ LINES 

1344 000614 2y VECT: ged INTERRUPT VECTOR ADDRESS 

1345 000616 60 CES: :UNIT DE sonrea (PARITY, DENSITY, UNIT, TRACK) 
isi ppoese Poon eR RERONT: 100 oo Rtg pu R (2 - 4000) OCTAL IN. Tuos COMPLEMENT 
1348 000624 oo0c0 ATRN: 1 :DATA PATTERN SELECTOR (0 - 20) OCTA 
1338 0 g595 RDCMD: 2 READ COMMAND 

1 0 9000! SPFLG: 1 SINGLE PASS FLAG 

1351 000632 000001 STAL: 1 ;READ STALL 

1352 000634 090001 WSTAL: 1 tWRITS STALL 

1353 000836 900001 TSTAL: J s TURN AROUND STAL 

1354 000640 091000 YSTAL: 1000 | YOZZLE STAL 

1355 0064 600109 RCSAV: 100 RECORD COUNT SAVE 

1356 000644 1776 CCSAV: =200 ; CHARACTER COUNT SAVE 

1357 00646 00000 TMEX: 9 MARK FLAG: 1=T™M O=NO TM 
1358 O006S0 177776 PSil: 177776 ‘PROCESSOR STATUS 

1359 909652 177570 R: 17757 ‘CONSOLE SWITCHES 

1360 000654 177570 DISPLAY: 177570 

1361 000656 177560 TKS: 177560 Ty READ STATUS REGISTER 

1362 000660 177562 TKB: 177562 ty AD BUFFER 

1363 900662 177564 TPS: 177564 ITTY PUNCH STATUS REGISTER 

1364 4 177566 TPB: 17756 sTTY PUNCH OUTPUT REGISTER 

1365 177550 PRS: 17755 sH/S READER STATUS REGISTER 

i366 000670 1775 ; B: 177552 tH/S R 

1367 7e 1 3ee4 RANBAS: 153624 pa ARUNBER” GEnenaror BASE 

1 674 172520 REGST: 172520 STARTING REGISTER ADDRES 

1365 000876 032561 RANSAY: 032561 RANDOM NUMBER BUFFER 


re ee ee ee eee 


nn ae a cre ee 
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OZTMAD.P11 ACT] 4odKs 

1371 

1372 sFLAGS AND COUNTERS*xxxxx##44 

Hae Sore soe a TY BAB Bie 

tae BapeBS  BonaaS tie: 8 fT Ty INPUT BUFF 

1377 000706 900000 TENP1: 9 ‘TEMP STORAG 

13 9 pacno9 TEMP2: 0 ‘TEMP STO 

1378 O0071e O90000 Tena: 9 : TEMP STORAGE 

1389 00714 dDd0900 TEMPY: I TEMP STORAGE 

1381 000716 9S0CQ00 EMADDR: 0 tERROR MSG ADDRESS STORAGE 

1382 000720 oo0000 BLCNTR: 9 ‘BLOCK COUNTER 

1383 000722 Of0000 BBC: 0 :BAD RECORD COUNTER 

1384 000724 900000 RTRN: 0 ‘ INTERRUUPT RETURN STORAGE 

1385 00728 9000 HORFL: 0 tH FLAG 

1388 9007 STAL: 0 !DELAY STORAGE 

1387 000732 o00000 PFLG: 0 :PRINT FLAG 

1388 000734 00 UNP: 0 ‘UNIT TABLE POINTER 

1389. 36 090000 BCNT: 0 :BIT COUNTE 

1390 090000 ERSAV: 0 STATUS STORAGE 

1391 2 900000 SERFL: 0 :STATUS ERROR FLAG 

1392 O00744 Oco000 DERFL: 0 :DATA ERROR FLAG 

1393 OO0746 00000 BTFLG: 0 :BAD TAPE FL 

1394 000750 oc0000 RPCNT: 0 ZREPEAT COUNTER 

1395 90975e OD0000 RICNT: 0 "RETRY COUNTER 

1386 900764 000000 RTYFL: 0 ZRETRY FLAG 

13 o00009 MFLG: 0 :TM FLAG 

1398 o99900 EOTREC: 0 ZEND OF TAPE RECORD 

1399 900762 00000 TPT: 0 BAD TAPE POINTER 

1400 000764 o00000 ERTFL: 0 ZERASE TAPE FLA 

1401 o00000 BOPP: 0 :DROP POINTE 

1402 000770 oD0000 B 0 :PICK POINTER 

1403 000772 0 BTSTF: O !BAD TAPE STATISTICS FLAG 

1404 000774 coc000 RRTYFL: 0 ZREAD RETRY FLAG 

1405 o00000 EQCT: O tAUTO SEQ PASS COUNT 

1406 990099 OUNT: 9 

1407 990009 TEMPST: 0 

1408 991004 ooD000 ROSW: | 0 

1493 001006 onoo0c DUCTR: 0 sDROPPED UNIT COUNTER 

1416 901010 doo00d STCDFL: 0 :? TRK CORE DUMP FLAG 














Stetstatststatat=) 


Q 
2 


SRONBSESe 


= 
it 


& 


S688e8S8sssessess 


> = bb +> <b = 6+ b = b-= bb 0 bp 9 gs 


oe 


2 


s 


mm tn ee er ewe ee = ee ee ee eee 


etetstetat=tats: 
ee ee ee 
9000 
NoFLue 


a ee ee ee, 


;UNIT ORDER AND DESCRIPTION TABLE #4x#e2444% 


60000 ;THIS TABLE IS LOADED 
~s WITH UNIT NUMBERS AND 
~; THEIR DESCRIPTIONS IN 
| THE ORDER THAT THEY 
~ WILL BE TESTED 


sUNIT WRITE ERRORS#***#44%%% 


o00 


UNIT READ ERRORSH*¥¥X*2¥XX444444444% 


Ooooodooo += Co0000 
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OZtMAD.P11 acT11 HOOKS " 
o 
J sUNIT DATA ERRORS#444 44444444444 424% 
14688 001134 000000 DATERI: 0 
1469 001136 000000 DATER2: 0 
1470 tts COo90 DATERS: 0 
| 1471 001142 000000 DATER4Y: 0 
; 2472 001144 000 DATERS: 9 
1473 001146 090030 DATERS: 0 
1474 001150 000000 DATER7: O 
ie 001152 9000000 DATERS: 0 
1326 ;UNIT RETRY COUNTERS###x42%2%4% 
1478 001154 900000 RTY1: O 
; 4488 001156 O00000 RTYe: O 
1481 001160 9000000 RTY3: O 
| 1482 001162 Go00 RTY4: 0 
;} 1483 001164 000000 RTYS: QO 
+ 1484 001166 RTY6 0 
1485 001170 000000 RTY7: QO 
a 001172 o00000 RTY8: QO 
ise sUNIT SOFT READ ERRORSHXXXX2H#EHHEHXKKKERHEE EEX 
; 1490 001174 0900000 GDRTY1: 0 
' 12491 001176 000000 GDRTYe: 0 
| 1482 001200 000000 GDRTY3: O 
1493 O0le02 000000 GDRTY4: 0 
1494 991204 900000 GDRTYS: 0 
1495 001206 000000 GDRTY&: O 
; 1496 001210 9000000 GDRTY7: O 
ie 001212 o00000 GDRTY8: O 
1438 sUNIT HARD READ ERRORS¥XX2£444XX44EXXEKEEXHRESE 
| 1501 001214 000000 BORTY1: 0 
| 3502 601216 009000 BORTYe: O 
' 1503 001220 0000 BDRTY3: O 
_ 2504 O0leee 000000 BDRTY4: 0 
| 1505 001224 BORTYS: 0 
/ 1506 001226 000000 BORTY6: O 
| 1807 001230 000000 BORTY7: O 
en 001232 9000000 BORTY8: 0 
1310 sUNIT EOT COUNTERSHHRHRER REE EEEEEEEHLLHEEKARAALEEEE 
eis 001234 000000 EOTCT1: O 
1513 001236 00 EOTCTe: 0 
1514 001240 900000 EOTCT3: O 
1515 OO0le4e EOTCTY: O 
1516 001244 900000 EOTCTS: 0 
1517 001246 EOTCTE: O 
1518 O0ieS0 000000 EOTCT?: 0 
2i2 GOieSe 000000 EOTCTE: 0 


‘ 
? 
' 


tad 


sete me te mee ee eee 


ee 


~ a2 
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Send Els ACTIL SOOKS 

182 

is sDROFS + PICKS PER CHANNEL PER UNIT sesesesessasscssssssses 
i524 001254 00000 Beco: oO 
1525 Soles “2.418 
i526 o01e74 050000 epic: 6 

1527 SCl314 ai .2.416 
ibe8 001314 55050 eezo: 6 ay 
1230 001334 peise4 BPs: 0 

1531 051354 -2. 416 
i532 001354 900000 epug: 6 
1533 §0:374 ~2. +16 
1534 01374 900000 peso: 6 
1535 601514 =. 41 
1536 901424 900000 seco: 4G 
4 14 2.41 
} 001434 B70: 6 
t255 cosa peecea ms 
154! Bpraoa "2.416 
1542 901474 God000 gore: 6 

154 901514 “2.416 
1544 901514 ocodce ep20: § 
LES 1534 “2. 416 
1545 001534 e020: 6 

1547 ae: 001554 ad arti 
a7 = 3 

1546 arta ~2. 416 
i556 001574 900000 eoso: 6 

1551 001614 “2.416 
i553 001614 “900000 soca: 6 

1ss3 001634 -=.416 
1554 001634 900009 eo7c: 2 

i5Es Oo1es4 -2. 416 
1557 sUNIT BAD TAPE COUNTER: 16 PER DRIVE 
1559 co1es4 ocoo00 e790: 0 

tee) col7eo BodoRH an 8 
1562 002064 “2. +102 
1563 02064 900000 BToe: 0 
1564 002176 .=. +102 
1565 002170 000000 e703: 0 

1269 poze7y pos800 eto: On UF 
1568 boesbo “2. +102 
1569 02400 eros: 0 
1570 002504 12.4102 
1571 002504 900000 BTos: 0 

1295 pocein - poston ma 
E55 cept erie ee 
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sUNIT BAD TAPE POINTERS#ssesaesee 
BTADOR: gThe 


TOL 

BT0e 

5703 

BTO4 

BT0S 

BTOb 

sT07 

;DATA PATTERN GENERATORS##seeeeeeeee 
DATEL: . sENTRY TABLE 
DATA: DATO sEXTERNAL INPUT FROM H/S READER 
DATAL: DAT] ;ALL ONES 
DATRe: DATE sALL ZEROS 
DATA3: DAT3 ;WALKING ONE 
DATAY: DATY : WALKING ¢FRO 
DATAS: DATS sALTERNATING ONE/ZERO 
DATRE: DATE sALTERNATING ZERO 

TA7: DAT7 sALTERNATING ONE 

DATAIO: DATIO ;ALTERNATING ZERO/ONE IN ALTERNATING CHARACTERS 
DATAL1: DATI1 ;ALL BITS 0-377 
DATAle: DATIe ;ALL BITS 377-0 
DATAL3: DATI3 sALTERNATING CHARACTERS 0 AND 377 
DATALY: DATI4 3ALTERNATING CHARACTERS 377 AND 9 
DATAIS: DATIS ;WALKING ZERO REPEATED FOUR TIMES 








/ONE 
/ZERO IN ALTERNATING CHARACTERS 


aa ae 
fad 
-+ 
bin 
m 
. 8 
“Tie-- 
o-oo 6 
j 
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1806 

1607 

1658 

1509 VEN 

1819 + REERREESERER EEE ERERER SEES REELS ERAS SERRE SRS REESE ES ER ESS 
| 161 1 ; PROGRAM START AND SEQUENCE FORMATTER: 

pis THIS ROUTINE Is USED TO PERE 

1614 ;DECIDE, WH RANSPORT T Test AnD’ ei ava agit try 

ie: s LOAD att WRITE E BUFFER WIT WI H THE SEL ECT DD ERN, 

1817 er ate eYCLE REQUESTED By TH Teen cut FING. 

isis *AT THE END OF THE TEST CYCLE THE NEXT UNIT IS SELECTED 

1619 "AND CHECKED FOR AVAILABILITY AND THE TEST CYCLE IS 

1620 “EXECUTED ON IT. 
| 3621 i The NUMBER OF BITS DROPPED OR PICKED MAY BE PRINTED 
| see THE END OF EACH TEST CYCLE VIA CONSOLE SWITCH FOUR (4). 
} 1°s3 scanaunobuensebanannetenesectheahuatecsestenaseseuseees 
! 

i625 

1626 002772 005037 921624 START: CLR ASEGE sCLEAR AUTO SEQ F 

1627 902776 012737 177570 oodese MOV #177570, SUR :PRESET FOR PBNSOLE™ SWITCHES 
| 3628 003004 005737 TST as42 :SEE IF CHAIN MODE 
( 1829 003010 001436 BEQ STAUT :IF NOT: 
| 1839 003012 012706 MOV #500, SP :SET UP STACK POINTER 

1621 003016 012704 023144 MOV 8MSG31,R4 
| 1832 003022 004737 020530 JSR —- PC, TTOUT ;PRINT TITLE 

1633 003026 122737 O00004 o0c041 CMPB 84, 841 *SEE IF LOAD MEDIUM 

1634 903034 901056 BNE 1 IF NOT: BR 

1635 003036 012704 026120 MOV #MSG97, R4 

1626 03042 004737 JSR PC. TTOUT sPRINT NO TEST LOAD MEDIUM 

1637 903046 000137 004622 JMP REOTB END TEST 

1633 b030S2 ier 000176 o00ss2 1S: MOV #176, SWR :SET FOR SOFTWARE SWITHCES 

1639 01 001014 MOV RO :SET UNIT POINTER 

1640 003064 022720 177777 2s: CMP 8-1, (RO)+ ;SEE_IF END OF UNITS 

164i 003070 OO1404 BEQ IF SO: 

1642 003072 062737 OOO401 004716 ADD #401,REOTC *ELSE BUMP UNIT EOT COUNTER 

1643 003100 00774 BR 2s 

1644 003102 000137 o00210 3S: IMP CHAIN :GO_DO CHAIN START 

1645 903106 012737 909001 000700 STAUT: MOV #1, TINE “SET TTY ENTRY FLAG 

1646 003114 905037 013304 CLR ROFL *CLEAR RANDOM DATA FLAG 

1647 003120 000137 003146 JMP STARTB 

1648 003124 005037 000700 STARTA: CLR TINE sCLEAR TTY ENTRY FLAG 

1649 003130 012706 090500 MOV #500, SP :SET STACK POINTER 

1650 003134 O04 022040 JSR PC *CHECK FOR SOFTSWR 

1651 bo3140 00045 BR STAUTO 

ibe 142 pesos? 000700 STARTE: CLR TINF sCLEAR INPUT FLAG 

1 bo3146 O12700 000702 STARTB: MOV #T0B, RO 

1654 1S2 012701 o00044 MOV #44. RI 

1655 003156 O05020 STARTO: CLR (ROS+ sCLEAR FLAGS AND COUNTERS 

1656 003160 005301 DEC 1 

1657 093162 O01 STARTO 

1658 ’ 12700 000510 NOV #510 SET SIZE. OF TABLE 

1659 003170 012701 001074 MOV #WTERL, RI :SET START OF TABLE 

1660 003174 GGs021 STARTC: CLR (R1)+ *CLEAR STATISTICS TABLES 

166: 003176 005300 DEC RO 





a ee ee ee ee ee ee ee ne 


— 


11 
Pll acti: HodKs 
003200 0013 
003202 poasc8 177777 
003210 Ole737 177777 
18 612737 O00001 
175352 
003230 052777 010000 
003236 Ol2e70& 000500 
Soaeue O1es37 NOnSNG 
003254 004737 010722 
003260 004737 110 
003264 905000 
003266 022737 000176 
003274 901005 
093276 005737 oo004e2 
003302 001002 
003304 004737 022164 
003310 O0Si60 O01012 
003314 001411 
003316 005160 oo1c1e2 
ae Rea ie 
oo0d02 
003334 000137 10 
Bere fale Bi 
1 004716 
003350 000303 
0033S2 110337 004716 
Basse blsros Sani 
1 000734 
003370 O0S16D O010le 
Bin HEL 
160 o01012 
bo3402 016037 901012 
iy Bossy | boa7e5 
002420 005737 021624 
Braase fea73? 00720 
003434 001010 
003436 005160 001012 
Cos442 012737 I 
atta 005037 000734 
003454 000207 a 
Soauee poeten pbioie 
ere He oun 
76 pe 000200 
NO140e2 
004737 O10644 
3512 032777 OOO400 
001402 
bo3See 004737 013236 
032777 000100 
003534 001402 
903536 0047327 O10676 


000720 
175344 


175374 


O00&Se 


0010ie 


175272 


000616 


STARTD: 
1$: 


STAUTO: 


STAROA: 


STAROB: 


STARTI: 


STARIA: 
STARIB: 


F 
STARIC: 
C 


START2: 


STARTS: 


PC 


TSOS OR TULO,N.W_ MULTIDRIVE DATA RELIABILITY EXERCISER 


STARTC 
s-1, pet 


+ 0000 aMTc 
#500, SP 


UN1 (RO), UDES 
TARTY 
CNTR 
ASEQF 
se 
CNTR, ABLCNT 
STARIC 


ner 
UNP 


UNP 
UN1 (RO) 


UN1 (RO), UDES 
200, ISWR 


PC,RCNTR 


ee ee ee ~ ee eee 


MACY11 27(732) 


; CLEAR 


TRESET PATTERN 


;RESE 
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peel hen COUNTER 
;POWER CLEAR CONTROLLER 
;CHECK FOR SORTSWR 

;GO0 GET PARAMETERS FROM TTY 


;G0_ RESET 


POINT TO FIRST ENTRY 
: TEST FOR SOFTSWR 


:SEE_IF CHAIN MODE 
SASK F FOR CONTROL SETTINGS 


s SEE IF LAST ENTRY 
F SO: BR 


;CLEAR EQT/DROPPED FLAG 
;POINT TO NEXT UNIT ENTRY 
;CONTINUE CLEARING 


;IF LAST UNIT IN STRING: BR 
;LOAD NEXT UNIT DESCRIPTION 
;BUMP BLOCK. COUNTER 


:SEE IF AUTO SEQ 
F NOT: 
SEQ 


:1F NO 
3 SEE IF 
;1F NOT: 


jRESET UNIT TABLE TERMINATOR 
BLOCK COUNTER 


RESET UNIT POINTER 
;RETURN TO AUTO SEQ 


;LOAD FIRST UNIT DESCRIPTION 
Pee IF RANDOM RECORD SIZE 


F NOT: BR 


;GO_GENERATE ere CHAR COUNT 
see IE at DATA 


:GO 
;SEE 
:1F 


NERATE RANDOM 
r. neon RECO 


ATA 
COUNT 


;GO GENERATE RANDOM RECORD COUNT 


A a ee eee cee ee 0 a et eee eR Eee ae ona 


ee ee eee 


TSO3 OR 
aE bt CTLI obKS 
171 760 100000 
et ee ee 
1729 eS 737 o000u2 
i? bosses BI 000616 
1723 0038 pode 99 cee 
ieee Beets Baiosy COC 
1726 QO3E04 03277 ooooo2 
17 Bose ta Boaz? 017506 
1723 003620 012704 025477 
133) Bosesa B5003: 
He es AS cae 
1734 44 peas 1 
1735 Or3ee0 012704 073703 
i533 Boseed bods? S08 
1738 O02664 005037 001010 
1739 003670 032777 
1740 003676 O01411 
1741 903700 013704 000616 
1743 003704 04 117777 
1743 003710 O22704 
1744 003714 001 
1745 003716 005237 001010 
tou? BoSvSe BONTS? pOdeoD 
1748 003732 004737 005254 
i749 003736 013737 000636 
1750 003744 004737 010634 
1751 003750 004737 
1752 003754 013737 000636 
1753 002762 004737 010634 
1754 003766 032777 000020 
1756 See ee 000001 
1757 posoge 005237 2 
1758 004006 904737 015370 
1759 O04012 005037 ? 
1760 OO4DI6 017700 174630 
1761 O04022 042700 177762 
1762 OO4026 O22700 O00015 
1763 go4o32 001424 
1764 032777 000001 
1765 o04042 001013 Re 
i7e7 Doweo Dols 
1768 BO40S2 004737 017506 
1358 Boapes para? peessn 
1771 OO04066 000137 O20050 
1772 04072 062737 o00002 
1773 904100 005077 174476 


001012 STARTY: Bal 


000734 
175012 
174776 
174766 


174742 


174702 


000730 


009730 
174656 


174536 


000734 


STARYO: 


STARY4: 


STARYS: 


STARE: 


1S: 


STARTS: 


STARTE: 


START?: 


TULO,N.W_ MULTIORIVE DATA RELIABILITY EXERCISER 


Stes »UNICRO) ; 


| 
BTSTF 
PC PRSTAT 
BTSTF 
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aia i. UT REACHED EOT OR DROPPED 
sPOINT TO NEXT UNIT 


;SET UNIT NUMBER 
60 FY ASSURED STATUS 


‘SEE IF REWINDING 
IF NOT: BR 
:PRINT HEADER 

;PRINT REWIND MSG 


;AWAIT REWIND DONE 


;PRINT HEADER 


PRINT NOT AVAIL 
“CLEAR 7 TRK CORE DUMP FLAG 
*SEE IF 7 TRK 


‘IF NOT: BR 
:GET UNIT DESCRIPTION 


;MASK DENSITY 
: SEE i CORE DUMP 


LIF 

sELSE ot FLAG 

:G0 SET UP WRITE DATA 
Reno 

SET TURN AROUND DELAY 
;DELAY 

;GO_ TO READ SEQUENCER 
spel TURN AROUND DELAY 


LAY 

; SEE a SHOULD PRINT DROPS AND PICK 
IF NOT: BR 

;SET RECORD cones TO 1 

;SET FOR STAT PRINT ONLY 

PRINT STATISTICS 

CL LEAR FLAG 


MASK READ/WRITE SWITCHES 
; SEE IF HAVE READ OR WRITE 


SIF NOT: BR 
:SEE IF HAVE UNIT READY 
SIF SO: BR 
sDEL AY FOR TUR 

PRINT HEADER 
SPRINT NOT AVAIL 
:G0 DROP DRIVE 
:POINT TO NEXT UNIT 
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ost ACTIL HOOKS 

| ie 004104 00137 od03356 STARTS: IMP START] s CONTINUE 

1 sRANDOM BASE RESETeexeeeeee 

1778 ve atr pies pezert pers RANSET: a r22eel ans PEST Peece 

i> Spates pisses Sade42 o05e20 MOV Ha *RESET RECORD COUNT 

1781 OO04%132 013737 O00644 000622 MOV SESAy care = RESET CHAR COUNT 

i7B2 004180 000207 RTS PC 


ape 








> Pl ~I~3 
Put eus 


1787 


1793 


SERRISROSN UN SN eestor Ses SRNo eRe sad aiaE 


co 
& 


1 YSO3 OR TU1O,N ‘. ff 
1 HobK 


ACTI1 


Se 


= 


Runs 


004 
004716 


in > 
ULI 


174432 
174422 


174414 
000746 


000746 


174230 


00102 


REOT: 
REOTI: 


15: 
2s: 


REOTIC: 


REOTID: 


REOTIA: 


REOTIB: 


REOTe: 


REOT3: 


IDRIVE DATA RELIMBILITY EXERCISER 
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(JHB E HEHEHE HEE 
; REWIND FROM EOT: 


S WHEN ANY TRANSPORT BEING TESTED REACHES END OF TAPE 
WRITE OPE 8 


UDES, IMTC 
#10, onTS 


PC, TTOUT 


EOTeTI (RY) 
EQTCTI CRY) ,R3 


REOT3 


8 IT LL BE REHOUND 
SAND FLAGGED AS UNAVAILABLE UNTIL ~ a he NITS 
HED EOT A ot a *. 34 IN 


;LOAD COMMAND REGISTER 


;AWAIT SETTLE DOWN RESET 
:START REWIND 

PRINT HEADER 

: ERROR DURING RETRY? 

IF NOT: BR 


;PRINT RETRY 


;BACKSPACE ERROR 
:IF_NOT: 


BR 
POINT TO er ace ERROR MESSG. 
CLEAR BAD TAPE FLAG 


TE NOT TAPE FLAG 
SET UP BAD TAPE MESSAGE 
CLEAR BAD TAPE FLAG 


15 if AUTO SEQ? 
1S IT RANDOM DATA? 


;1F SO:_ BR 
;PRINT EARLY ASEQ EOT MESSG. 


;PRINT EOT MESSAGE 

;BUMP EOT COUNTER 

;PRINT EOT COUNT 

‘PRINT STATS. WITHOUT HEADER 


sAWAIT CUR 

;SEE IF LAST UNIT TO REACH EOT 
;IF SO: BR 

;SET EOT FLAG 

3GO TO NEXT UNIT 





YD 
-4 


“e~ 


raid 
w 


-4 
_ 
b+ 9 


53 & 


cs 


ror 


fae 


OSU UST EEE 


Bee St ts 


fe 
0D 


-~ 


BENE RSE Bsa Tolal Suncom iin Boe Boe aN OR 


wo 


0—* b+ bs b= b= 2 B= + = 2 bh + Ob -2 8-2 & 2 & 2 2 BH 2 2 = 2 & = 2 § -2 B= 2 B-2 & 9H = OP -- H -o He 
ee 


Bee 
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BER Bt a en 


716 MOVB RO.REOTC sRESTORE EOT UNIT COUNTER 
1 ate an UN RO ‘POINT TO F 
< 
pt 3n00 eres 000616 REOT4: MOV UNI (RO), UDES $LOBD uNtT Beata bt ION 
336737 000200 o00616 gi #200, UDES See IF UNIT IS ORCPPED 
ie 000816 174124 MOV UDES, aMTC tL COMMAND REGISTER 
777 O00002 174114 REOTS: BIT #e ais 
1374 nd BNE  ——- REOTS AWAIT RWS RESET 
000040 174104 BIT #40, IMTS :SEE IF HAVE BOT 
001012 NE REOtE -IF SO: BR 
Ole | MOV i,RO 
5509 ia ISR PC’ P, ;PRINT HEADER 
012704 023655 MOV #MSG48, RY 
004737 020530 JSR PC, TTOUT sPRINT BOT ERROR 
000137 o20050 IMP DRPORV G0. DROP 
800010 174050 REOTE: BIT #10, aMTS :SEE IF SWON IS RESET 
001374 BNE REOTE 31F NOT: AWAIT SWON RES SET 
042760 100200 o01012 BIC #100200,UN1(RO) ;CLEAR EOT/DROPPED FLAG 
062737 OO0002 000734 REOTEA: ADD #2. UNP 
013700 000734 MOV une RO sPOINT TO NEXT UNIT 
005160 o010l2 COM UNI tRO) ;SEE IF LaST UNIT 
001404 BEQ REOT7 IF Su: BR 
005160 001012 COM UN1 (RO) 
000137 o04432 JMP REOTY :DO NEXT UNIT 
005160 O01012 REOT7: COM UNI (P53 
O12 900001 000720 MOV #i, BLCNTR ;SET TO BLOCK COUNT 1 
005037 000734 CLR UNE 
905000 CLR RO ;SET TO RESTART WITH FIRST UNIT 
005726 TST (SP)+ RESET STACK 
005737 021624 TST ASEOF *SEE IF AUTO SEQ 
001401 BEQ REOTS ‘IF NOT: BR 
on RTS PC > RETURN 
012704 023473 REOTS: MOV #4SG39, RY 
004737 020530 JSR PC, TTOUT ;PRINT END OF PASS 
005737 000630 TST SPFLG SEE IF SINGLE PASS 
dol4ie BEQ REOTX IF NOT: 
01 oooo4e2 REOTS: MOV aed2, R4 
901405 BEQ HERE sIF NOT CHAIN MODE: BR 
000005 RESET 
004714 SENDAD: JSR PC, (R4) 
oo024o NOP 
Bpnsa0 NOP 
NOP 
000240 RE: 
TSE ROT How RESET STACK 
eae eagle JSR $208 RANGE *GO RESET RANDOM BASE 
012737 177777 012750 MOV #1 PA jPRESET PATTERN 
005037 013304 CLR oft *CLEAR RANDOM M DATA LAG 
001006 CLR ot UCTR ; CLEAR DROP PPED UTTER COUNTER 
000137 003264 IMP STAUTO *RESTART AT BLOCK NUMBER ONE 
00940! REOTC: 401 tEOT UNIT AE OTNTER CHEFS T TO ONE UNIT) 




























T™,A,B-11 TSO3 OR TULO,N,W MULTIDRIVE DATA RELIABILITY EXERCISER MACYI1 27(732) O4-NOV-7& 11:29 PAGE 49 
DZtMHD.P11 ACTIL HOOKS 


1B3e 5 EERE EKER EAA ERE EEE REET EEA E EE EARLE REE EEE EEE EARS 
1895 ;REWIND ALL AVAIL TAPES: 





1836 : 
1897 :THIS ROUTINE; ENTERED VIA CONSOLE SWITCH NINE (9), 
1898 WILL REWIND ALL AVAILABLE TAPES TO BOT NO MATTER * 
1899 WHERE THEY ARE CURRENTLY POSITIONED AND RESUME TESTING 
1900 *AT A BLOCK COUNT OF ONE (1). 
' an ; KEAKRKLLERLEA AE KEL AKLA LEER A ELA LAE LA LLLE LAA ZEELALFFLEL FSF 
1903 720 001000 173724 RWND: BIT #1000, ISR :SEE IF SHOULD REWIND 
1804 004726 90100 BNE RWNDA -IF SO: BR 
1905 004730 90 RTS PC ELSE EXIT 
1906 004732 005037 000734 RWNDA: CLR UNP :CLEAR POINTER 
1907 004736 37 OO4716 SWAB EOTC 
1998 904742 013700 OO4716 MOV REOTC,RO 
1909 746 000337 004716 SWAB —- REOTC 
1910 O0047S2 110037 004716 MOVB RO, REOTC RESTORE EOT UNIT COUNTER 
1911 004756 613700 000734 RWNDO: MOV 0 :POINT TO UNIT ENTRY 
1912 OO4762 OO0SI60 O01012 COM UN1 (RO) *SEE IF LAST ENTRY 
1813 004766 001424 BEQ 2 IF SO: BR 
1914 004770 O0S160 oD1012 COM UNI (RO) 
1915 004774 016037 OD10l2 ooD616 MOV UNI(RO),UDES | ;SET UNIT DESCRIPTION 
1916 013777 000616 173572 DES, aMTC ‘LOAD COMMAND REGISTER 
1917 005010 052777 000017 173564 BIS #17, aMTC START REWIND 
1918 905016 000200 173556 RWNDI: BIT #200, aMTC 
1819 O005024 001774 BEQ RWNDL sAWAIT CUR 
1920 005026 062737 op0002 000734 ADD #2, UNP *BUMP POINTER 
1921 005034 000137 004756 IMP RWAGO :DO NEXT UNIT 
1922 905040 005160 O0101e2 RWND2: COM UN1 (RO) 
19823 005044 005037 000734 CLR UNP sCLEAR POINTER 
1924 05050 013700 000734 RWND3: MOV UNP, RO :POINT TO UNIT ENTRY 
1925 005054 005160 O01012 COM UN1 (RO) *SEE IF LAST ENTRY: 
1926 005060 001452 BEG RWNDX IF SO: BR 
1927 O0S062 005160 oD1012 COM UN1 (RO) 
1928 O0S066 016037 001012 onDb16 MOV UNI(RO),UDES | ;SET UNIT DESCRIPTION 
1929 005074 032737 000616 BIT #200, UDES *SEE IF UNIT IS DROPPED 
1930 905102 001403 BEQ TF NOT: BR 
1931 005104 005337 cO4716 DEC REOTC *ELSE DECREMENT EOT UNIT CNTR 
1932 005110 O00417 BR RWNDS 
1933 05112 13777 OO00616 173462 iS: MOV UDES, aMTC sLOAD COMMAND REGISTER 
1934 0051 000002 1734S2 RWNDY: BIT #2, aMTS 
1a3p BoetS8 $9257 ooOOND 1734H2 Ce eee ours Ee hove BOT 
ozs ; 
1a39 poet ae at { { BE Ru : sate 
1938 005140 032777 O00010 173432 1S: BIT #10, aMTS :SEE IF SDWN SET 
1939 O05i146 001374 BNE 1$ IF SO AWAIT RESET 
1940 005159 062737 OD0002 000734 RWNDS: ADD #2, UNP :BUMP POINTE 
1941 005158 000137 05050 JMP = RWAD3 :D0 NEXT UNIT 
1942 O05 012700 o00001 RWND6: MOV ¥RO ; 
1943 166 004737 017506 PC’ PAPRT ;PRINT HEADER 
1944 005172 012704 023655 MOV #MSG48, R4 
1946 005176 004737 02 JSR PC. TTOUT PRINT NO BOT i 
1 0001 IMP DRPDRV *GO DROP DRIVE 
1947 O05206 005160 O010le RWNDX: COM 
1948 005212 o0S5000 CLR 
1949 005214 010037 000734 1S: MOV 


0 re cere see ee One ee Se PRESS a 
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1950 of 37 00! 0061 MuV UN1‘RO) ,UDES 
1951 poesee ue rie ie Bobet BIT g1002007UDES =; SEE IF UNIT DROPPED 
1952 005234 80 2g LIF NOT: 
1953 905236 yeaa eooooe ADD #2,R0 
1954 905242 cO0764 BR 1§ 
1955 05244 Ole73s7 coooo: ocoo7eo es: MOV $1, 8LCNTR 
1956 005252 900207 RTS PC 
(TG EA SEDO Ca aE 


Ce o_O ooo 
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1957 
1238 5 REREKEERELE LER ELLER ELE LELEE LE EELEL AES RELEERFEREELELE 
1353 SWRITE ROUTINE: 
191 ‘THIS ROUTINE IS USED TO WRITE ONTO TAPE THE BLOCK 
; 49 "OF DATA DESCRIBED BY THE OPERATOR apo a 
, 96 IN THE SEQUENCE FORMATTER. THE TAPE UNIT 16 BE USED 
1964 “HAS BEEN ASSIGNED BY THE SEQUENCE FORMATTER AND 
1965 ‘ITS PARAMETERS SET IN A U : 
1966 "AS EACH RECORD OF THE BLOCK IS WRITTEN, IT IS CHECKED 
1967 ?FOR STATUS ERRORS, WORD COUNT ZERO, AND CORRECT CURRENT 
1968 *MEMORY ADDRESS. {F THE WRITE OPERATION CAUSES THE SELECTED 
1968 sUNIT TO REACH END OF TAPE (EOT), THE UNIT IS REWOUND 
1$70 :AND FLAGGED AS UNAVAILABLE FOR TESTING G UNTIL ALL AVAILABLE 
1971 : * UN ITS” HAVE REACHED EOT A WHICH TIME ALL UNITS WILL 
1972 ?BE RESTARTED AT A BLOCK count OF 
| 1973 sFRROR CHECKING MAY BE DISALLOWED VIA CONSOLE SWITCH 
ete suai ing V0 TAPE MAY BE DISALLOWED VIA CONSOLE SWITCH 
| 1306 Frere rrttt tit iti titi it titi ittitttit titi rit tt tit t ttt 
| 1879 005254 032777 OO0001 173370 WRITE: BIT #1, ISWR :SEE IF SHOULD WRITE 
| 1980 o0S262 001076 BNE W3AD : : BR 
| 1981 O05264 012737 o224s2 oO07I16 MOV #MSGS,EMADDR § ;SET ERROR MSG ADDRESS 
1982 605272 005077 173304 CLR aMTC 
| 1983 005276 005077 17327 CLR aMTs 
| 3984 905302 005037 00076 CLR EOTREC ;CLEAR EOT FLAG 
_ 19885 98053068 013700 o00620 MOV RCNT, RO *ROSRECORD COUNT 
| 1986 Q05312 013777 000622 173264 WO: MOV CARCAT, aMWC LOAD CHAR COUNT 
| 1987 005320 012777 O26200 173260 MOV SlDATA; MDA *SET DATA ADD 
| 1988 005737 000764 TST ERTFL :SEE IF SHOULD ERASE 
/ 1989 905332 001406 BEG WOA IF NOT: BR 
- $990 005334 112777 000014 173240 MOVB #14, QMTC :SET OP-CODE: WRITE W/EXTENDED IRG 
| 1981 005342 005037 000764 CLR ERTFL CLEAR ERASE FLAG 
| 1992 005346 o00403 BR 08 
' $993 905350 112777 000004 173224 WOR: MOVB #4, aMTC ;SET WRITE OP COMMAND 
1994 005356 012737 005370 000724 WOB: MOV 1A, RTRN SET RETURN ADDRESS 
/ 1985 005364 000137 017006 JMP TAPG :GO EXECUTE COMMAND 
| 7996 905370 737 017402 WIA: TST WEOTF *SEE IF EOT FOUND 
| 1997 005374 901413 BEQ Wi : IF NO T: BR 
| 1998 005376 005037 017402 CLR WEOTF ‘CLEAR WRITE EOT FLAG 
1999 O05402 013701 O006e0 MOV RCNT, RI *BUILD SHORTENED RECGRD COUNT 
2000 OO0S406 160001 SUB RO, Ri 
2001 005410 0 INC R 
| pode o05412 010137 000760 MOV Rl, EOTREC 
/ pO03 oos416 O5e737 100000 000760 BIS #100000, EOTREC ;SET EOT FLAG 
 « B004 905424 777 010000 173220 Wi: BIT #10000, dSWR ; SEE IF SHOULD CHECK ERRORS 
2005 o0s43e 001002 BNE W3 T: BR 
20068 005434 004737 016026 ISR PC, ERCHK G0 CHECK JFPRORS 
2007 O05440 013737 000634 000730 w3: MOV WSTAL, STAL ;SET DELA 
2008 OOS446 004737 010634 JSR PC, STALL : DELAY 
2009 4S2 005737 000754 TST Y *SEE IF RETRY 
2010 OOS456 OO1401 BEQ W3A ‘IF NOT: 
2011 OOS4E0 009207 W3A0: RTS PC ‘ELSE RETURN TO RETRY ROUTINE 


e0ie 005462 005737 000742 W3A: TST SERFL :SEE IF WRITE ERROR 





- ee ee eee ee ee ED. 





-————_— 
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2013 ocs4s6 001453 BEQ -IF NOT: SR 
2014 005470 013704 000734 MOV UNP, RY “BUMP WRITE ERROR 
2015 005474 005264 001074 INC WTERI (RY) 
2016 905500 005037 9000742 CLR SERFL ;CLEAR STATUS ERROR FLAG 
2017 OOSE04 O22777 OO0O02 173140 BIT #2, JSWR *SEE IF RETRY -= SWl 
2018 o0S5i2 Ooo1041 BNE W “TF NOT: BR 
2018 005514 942737 O72521 900740 SIC #072521,ERSAV ;MASK UNRECOVERABLE ERROR 
2020 o0SS22 005737 0O00740 TST ERSAV ‘SEE IF RETRYABLE ERROR 
2021 005526 O01411 BEQ W3B ‘IF SO: BR 
2022 005530 012704 023735 MOV #MsScse, R4 
2023 005534 004737 020530 ISR PC, TTOUT ;PRINT NON-RETRYABLE ERROR FLAG 
2024 005540 012704 O224s2 MOV #MSGS. RY 
2025 005544 004737 O20530 JSR PC. TTOUT :PRINT WRITE ERROR TAG 
2026 oossso oo0422 BR wap 
2027 O055S2 013704 000734 W3B: MOV 
20e8 oos556 o0S264 001154 INC RTYI(R4) :BUMP RETRY CNTR 
be 032777 OO2000 173062 BIT #2000, ISWR :SEE IF PRINT ERRORS 
2030 005570 001004 BNE W3c -IF NOT: BR 
2031 005572 012704 923755 MOV #MSGS3, RY 
2032 005576 004737 020530 JSR PC TTOUT sPRINT ORIGINAL ERROR TAG 
2033 o0s602 005037 000752 w3c: CLR RTCNT CLEAR RETRY NUMBER 
2034 O05606 005037 000750 CLR RPCNT *CLEAR REPEAT COUNTER 
o0S612 004737 O06142 JSR PC, WRTY GO RE ITE ERROR 
2036 005616 005027 000754 W320: CLR RTYFL *CLEAR RETRY FLA 
2037 O05622 005737 000760 TST EOTREC “WAS EOT REACHED? 
2038 O05626 100403 BMI WEX : : 
20339 005630 005300 DEC RO *SEE IF DONE ALL 
2040 Ofs632 001227 BNE wo : T: BR 
2041 905634 o05200 INC RO "ADJUST FOR REC NO. IN HEADER 
2042 005636 005737 O00646 WEX: TST TMEX : ™ 
2043 O05642 001402 BEQ WEX1 IF NOT: BR 
2044 005644 004737 o0S712 JSR PC, WTM *WRITE TM 
2045 o05650 005037 000754 WEX1: CLR RTYEL *CLEAR RETRY FLAG 
2046 O0S654 005037 000756 CLR TMFLG :CLEAR T™ FLAG 
2047 005660 005737 000760 TST EOTREC TEST FO 
2048 OO5664 100401 BMI W4 *IF SO 
2049 SOSE66 000207 WEX2: RTS PC *EXIT 
2050 005670 017704 172756 WH: MOV aSWR, RY 
2051 005674 042704 177767 BIC #177767, R4 sCHECK IF WRITE ONLY 
2052 905700 022704 9o00010 CMP #10,R4 
2053 005704 901370 BNE WEXe -IF NOT: BR 
2954 695706 090137 oo414e IMP REOT GO REWIND ALL AVAIL TAPES 


ee ee oe ee 
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2056 5 RHRRERREKEEE ELLE ERE EKER EELELE LALA LE LAE RES BREE ELELEF EES 
£057 WRITE TAPE MARK 
2059 THIS ROUTINE, ENABLED THRU TELETYPE RESPONSE 
2060 *AT PROGRAM START-UP, WILL WRITE A TAPE MARK 
| 2061 "FOLLOWING THE WRITING OF EACH BLOCK OF DATA. 
2062 ;THIS OPTION INCREASES THE BLOCK SIZE BY ONE RECORD; 
| e063 :@ BLOCK OF 100 RECORDS WILL HAVE A TAPE MARK 
2084 “WRITTEN AS RECORD 101. 
Spee Pert ETeritt titer ttt ttttitittt itt tt titi ttt iti t ttt tte ey 
2067 O0S712 012737 Oe44S7 O00716 WIM: MOV #MSG62,EMADDR  ;POINT TO TM ERROR MSG 
2068 005720 005300 DEC RO 
20689 005722 005237 000756 INC TMFLG ;SET TM FLAG 
2070 005726 bos077 172652 CLR anc CLEAR mote COUNTER 
2071 005732 012777 Oe62e00 172846 MOV #WDATA, IMDA 
| 2072 005740 012777 OO0006 172634 MOV #6, MTC ;SET TM OP CODE 
2073 005746 012737 005760. 000724 MOV #WTMO,RTRN : SAVE RETURN ADDRESS 
; 2074 005754 000137 917006 IMP TAPG “EXECUTE TM COMMAND 
2075 005760 032777 O10000 172684 WTMO: BIT #10000, aSWR ‘SEE IF SHOULD CHECK ERRORS 
207 005766 OO10b2 BNE WTM4 IF NOT: 
005770 004737 016036 ISR PC, ERCHK “CHECK FOR ERRORS 
2078 005774 005737 o0074e2 TST SERFL SEE IF STATUS ERROR 
2079 006000 o01455 BEQ WTM4 NOT: BR 
| 2080 O08002 005737 000754 TST RTYFL isee IF RETRY 
' 9081 OO6006 001401 BEQ WTM1 
| 2082 O06010 000207 RTS PC FELSE RETURN TO RETRY ROUTINE 
2083 O06012 913704 000734 WIM1: MOV UNP, R4 
| 084 906016 005264 001074 INC WTERI (RY) ;BUMP WRITE ERROR 
| pO8S O06022 032777 O00002 172622 BIT #2, JSWR 3 SEE IF SHOULD RETRY 
| 2086 006030 001041 BNE WAY OT: BR 
| 2087 O06032 042737 147377 O00740 BIC #147977, ERSAV MASK UNRECOVERABLE ERROR 
| 088 O06040 005737 O00740 TST ER SAV *SEE IF RECOVERABLE 
| 2089 OO6044 O01411 BEQ TM2 IF SO: BR 
| £090 00604 012704 023735 MOV anses2 RY 
| 2091 O060S52 004737 020530 JSR PC. TTOUT sPRINT UNRETRYABLE TAG 
| 2082 06056 012704 024457 MOV anbGbe oat 
2093 008062 004737 020530 ISR PC, TTOUT ;PRINT TM ERROR TAG 
| 084 OO6066 on02 RTS 
' 095 006070 000750 WTM2: CLR RPCNT ;CLEAR REPEAT CNTR 
086 006074 013704 900734 MOV UNF. RY 
2097 056100 00 001154 INC —- RTYICRY) sBUMP_RETRY CNTR 
098 104 000752 CLR RTCNT CLEAR RETRY LOOP CNTR 
2099 006110 032777 O0e000 172534 BIT #2000, ISWR *SEE IF PRINT ERRORS 
2100 006116 O01004 BNE WTM3 IF NOT: BR 
2101 006120 012704 023755 MOV #MSGS3,R4 . 
2102 006124 004737 020530 ISR PC, TOUT ;PRINT ORIGINAL ERROR TAG 
2103 006130 004737 O06142 WIM3: JSR PC’ WRTY GO DO RETR 
2104 006134 005037 000756 WTM4: CLR TMPLG :CLEAR TM FLAG 
gids 006140 000207 RTS PC EXIT 
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MULTIORIVE ORTH RELIABILITY EXERCISER 


MACYLL 27(732) 


C4-NOVHTE 


SPRSFRESSSFASLF AHS SSS ASSES 


SHRITE ERROR RETRY 
S eeeeeenepapenenneseesens 


;SET_RETRY_ FLAG 


hints 
“~D wD 


aver tata) 


JSR 


ne 
THELG 


WRTYTM 


UNP, RY 
WTERI(RY) 


UNP, RY 
Feige ar 


> 
R4, ABTPT 
TPT. R3 
RG 
BLENTR, (RY) 


Rent (R4) 
RO, ( (RA) 


He STP 
WRTY4 


ee a ee 


269 SPACE BECK FOR REPEAT 
SEE IF A 


7IF SO: BR 
iREWRITE RECORD 
60 art TM_AGAIN 
i REWRITE GOOD? 
F NOT: BR 
: BUMP REPEAT COUNTER 
:SEE IF FOUR GOOD REPEATS 
;1F NOT: DO ANOTHER 


SEE IF PRINT 
IF NOT: BR 


;PRINT RECOVERED MESSAGE 
;PRINT RETRY TAG 


;PRINT RETRY NUMBER 
;RESUME TESTING 
SEE IF PRINT 

:IF NOT: BR 


SPRINT BAD TAPE SUSPECT 
;PRINT RETRY TAG 

;PRINT RETRY NUMBER 
;PRINT REPEAT TAG 









;PRINT REPEAT NUMBER 
SEE IF FIRST RETRY 
;IF NOT: BR 


C 

T UNIT NUMBE 

T ADDRESS OF UNIT BAD TAPE CNTR 
T COUNTER 

T POINTER OFFSET 






11:29 PARSE S4 
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| TM,A,B=11 7503 OR TUIO,N,W MULTIDRIVE DATA RELIASILITY EXERCISER MACYLL 27(732) O4-NOV-76 11:29 PAGE SS 
| O2tMsO.P11 ACTII HOOKS 
183 OCE44O 000137 ocD&STO TMP BTOV sELSE GO TO 00 TAPE OVERFLOW 
| 1e4 QOENW4 05837 O007Se WATY4: INC RTCNT BUMP RETRY 
165 450 sists 000004 900752 ci 84 RTCNT See IF 00 DONE 4 LOE TRIES 
1e8 BOeIEB Biacey OCOTay MOVs UNP_R4 . 
| e168 4e4 4 901154 INC RTYI (RY) :BUMP RETRY COUNTER 
| Ble 4 ess? o90764 C ERTFL :SET ERASE FLAG 
| g170 474 137 150 IMP WRTYO D0 NEXT RETRY 
| i 006500 600137 dd66i4 WRTYS: IMP BTUR ELSE GO TO BAD TAPE UNRECOVERASLE 
£173 WRITE RETRY BACKSPACE-ERASE SUBROUTINE 
Se 
| 2175 DOEEDS 905037 coo74e2 WRTSB: LR SERFL sCLEAR FLAG 
| B176 10 Qt 7777? «(172086 MOV 8-1, aMWC *SET FOR 1 RECORD 
| gif? Doeele Biers? 53 O0d716 MOV _ sMSG59, EMADOR 
| 2178 O06524 O04 O10466 JSR PC ae :D0 SPACE BACK 
| 2178 006530 b12737 O224S2 O0071E MOV Ages E MADDR 
| e180 DOb5% e737 O00COe O0074 BIT 82. BT ie G SEE I IF ERROR ON BACKSPACE 
| piel 141 BEQ bRtse0 :IF NOT: BR 
| 182 O06546 Boece 000754 CLR 
| e183 O0&5S2 Oerb26 CMP yt (SP)+ ;RESET STACK 
gies 006554 052737 OCO004 cO074S BIS #4, BTFLG *MARK RETRY ERROR 
| BIBS 000137 o04142 IMP reOT :REWIND AND REMOVE FROM TESTING 
e186 OOESEE WRTSBO: RTS PC * RETURN 
e188 ;BAD TAPE OVERFLOW SUSROUTINES#eexxeexs 
' 2190 006570 013704 000734 BTOV: MOV UNP, RY 
2191 906574 O05264 001154 INC RTYI (RY) ;BUMP RETRY COUNTER 
2152 MDEE00 012737 000001 o00746 MOV #1, BTFLG ‘SET BAD TAPE OVERFLOW FLAG 
' 2193 006606 0057; TST (SP)+ RESET STACK 
; giz O06610 000137 oo4142 IMP REOT ?GO REWIND AND REMOVE FROM TESTING 
: e138 ;BAD TAPE UNRECOVERASLE SUBROUTINE s#x#eeeex% 
4 
| E192 006614 012794 O24053 BTUR: MOV #MSGSB, RY 
2199 S06620 004737 020530 JSR PC, TTOUT sPRINT UNRECOVERABLE BAD SPOT MSG 
' 2209 906624 000207 RTS PC’ RESUME TESTING 
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TIDRIVE DATA RELIABILITY EXERCISER 


RSEQ: 


RSFROA: 


RSFRO: 


RSEX: 


{RREREPER ER ESEE ELE LES EEARGESSESEESESESERES ES SESE ESSE 
;READ SEQUENCER: 


THIS ROUTINE I§ USED TO DETERMINE THE SEQUENCE 
IN WH OPERATI RE TO BE PERFORMED. 

Pe THEE “ihe ISALLOWS Re AD TG. 

:1F THE PR S BEING RUN IN THE READ ONLY 

 CONSOL ) SET TO A ONE (1), THEN Moe rrnG 
; CONSOLE SWITCH FOURTEEN (14) WILL CRUSE READING OF 


ALLOW TAPE 
VELY WHEN SET TO A ZERO (0). 
RERSKESSSESSASLSELSELESELEFEE 


w 
an 
ne 

Z 


SEE 
Bi RSEX : IF Net: BR 
BIT 5 OSWR :SEE IF WRITE 
BEQ RSFROA IF SO: BR 
BIT 840000, aSWR ‘SEE IF SHOULD REMAIN IN PLACE 
BEQ RSFRO IF NOT: 
ISR PC, BKSP ?GO BACKSPACE TO START 
BIT #2, BTFLG “ERROR ON BRCKSPACE? 
BEQ RSFRO IF NOT: 
IMP REOT REWIND AND RRS Ses FROM TESTING 
MOV #2, RDC *LOAD READ F 
JSR PC’ READ :GO READ F 
BIT #40000, 2SWR “SEE IF SHOuCD READ SAME BLOCK 
BNE RSFROR” ; TF 80: BR 
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rerurururururunans 
See ya ieny 
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PRE RO ROM OD ME a sea 
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000716 
171644 
171620 
171614 
171602 
000724 
171560 


000760 
171536 


171556 


171524 


000740 
000740 





RDIA: 





SSI RIG 3 pct sal ste ca 


THI ROUTINE PERFORMS THe pea OPERATI ope Ter TNED 


BY 1 ie END OF” PAeH READ OPE He deg ar REGISTER 


SCANNED FOR EITHER E eo 


; P EoT WAS REACHED 

i EOT SUBROUTINE TO te Oe THE T's BND oF i IT 

s UNAVAILABLE UNTIL ALL UNITS HAVE ent HED E0 

;IF BOT WAS REACHED AND ERROR IS PRINTED AND THE 

: PROGRAM IIe Mh ee if 4 NG MAY BE RESUMED BY PRESSING 

THE CONTI 

s CONSOLE SWITCHES ELEVEN (11) AND THIRTEEN (13) DETERMINE WHETHER 
TO CHECK FOR STA "8 be FRRO ee OR DATA pRnone (13), 

‘CONSOLE SWITCH Ah (S) I eRe te A CONTINUOUS 

AND E (FORWARD CURRENT 


). 
Pree ererier rer ee tree rte eer e reer eer Tere TTT Tere Ten eee 


MOV RCNT, RO sLOAD REC CNTR 
MOV 8MSGb,EMADDR § ;SET ERROR MSG ADDRESS 
CLR TMFLG CLEAR T 


BIS #40000, dNTRD SET TO READ LPC ON READ 


;GO ND 
; SEE IF AT LOAD POINT 


JMP 

BIT #40,aMTS 
BEQ ¢ : BR 

sPRINT CYCLE NUMBER 


ISR PC, PAPRT 
MOV #MSG22, R4 


JSR PC, TTOUT ;PRINT BOT ERROR 

art oTO00 SSW oe PR SULD CHECK ERRORS 
ete RDS it Nor: BR 

ISR PC. ERCHK GO CHECK ERRORS 

TST SERFL CEE IF STATUS ERROR 

BEQ RDS ‘IF NOT: BR 

MOV UNP, RY 

INC RDER1 (RY) ;BUMP READ ERROR 

BIT #2, JSUR :SEE IF SHOULD DO READ RETRY 
BNE IF NOT: BR 


aMTS, ERSAV 
BIC 8073525,ERSAV .;MASK NON-RETRYABLE ERRORS 
BEQ ROYA IF RETRYABLE: BR 
MOV #MSGSe, RY 


JSR PC, TTOUT ;PRINT NON-RETRYABLE MESSG. 





TM, A,8-11 TSO3 OR Yu10 N,W MULTIORIVE DATA RELIABILITY EXERCISER MACY11 27(732) O4-NOV-76 11:29 PAGE SB 
OZtMAD. P11 aCTil 1 HO Aks 


2288 oc7T1S6 912704 022457 MuV ase RY 
2289 007162 737 020530 JSR PC TTOUT sPRINT READ ERROR TAG 
230 007166 eR RO 
2 9021 737 007376 ROWA: JSR ;D0 RETR 
32 7174 7 O20000 17:450 ROS: BIT aeS000,aSuR SEE If SHOULD DO DATA CHECK 
es 
33 855505 95499° ooorse Re iis It te 
2295 007210 001004 BNE RDG LIF 
2238 007212 13712 ISR PC. DCHK :G0 CHECK 
00721 749 CLR SERFL CLEAR STAT iH PERROR FLAG 
2298 ieee 004737 012516 RD&:  ### JSR PC, DS3 :CLEAR BUFFER 
2299 007226 g3e772 OCOO4O 171416 SIT wd, aSWR :SEE IF SHOULD YOZZLE 
2300 007234 140 8E0 RD? IF NOT: 8 
2301 007236 O04 007600 JSR PC, YOZ ELSE GO YO22LE 
236 breve 13737 000632 000730 RD7: MOV RSTAL, STAL ;SET DELAY 
737 010634 JSR PC, STALL T 
2304 007254 000756 TST TMPELG : JUST DONE ™? 
Sate poses Boe BNE BDEX $1 502 
900760 z EOTREC WAS EOT BE ACHED 
2307 007266 100430 BMI RDEX IF SO: BR 
2308 007270 DEC RO 
S08 SETSes ppesaS INE ORD SPO IUST FOR REE HO'IN HEADER 
221i raed 000646 RD1O: TS TMEX ‘EXPECT A TAPE MARK? 
2312 007302 001422 BEQ RDEX ‘IF NOT: BR 
2313 007304 DEC RO ‘ELSE READ TM 
2314 007306 O01 177776 171270 MOV #-2, IMWC :SET BYTE COUNT 
2315 007314 001010 TST STCOFL ‘SEE IF 7 TRK CORE DUMP 
ezi6 907320 4 EQ IF NOT: 
1 171256 NC aMWC SET TO " 
5318 Borass pisea> pouseS ooo 2 hie inses9, —— 
2320 ied piss35 171244 . BIC #10900, OMTRD  -;SET TO READ LPC ON READ TM 
535 Bb ac8 ate. it ndanen: 
000756 RDEX: CLR LG 
e3e3 007354 005737 000760 TST EOTREC sas EOT REACHED 
535d pas eee ipe0o? Fe (SP)+ *RESET STACK 
2326 007364 005037 CLR EOTREC :CLEAR EOT IND. 
2327 007370 000137 o04142 IMP REOT GO REWIND 
e328 007374 000207 RDEXX: RTS “EXIT 
535) 
e232 Joa pec cetennentaeninatie 
e333 ;READ ERROR RETR 
2 : 7 gab ee aE 
2237 007376 005227 000774 RRTY: INC RRTYFL ;SET READ RETRY FLAG 
2238 007402 032777 O02000 171242 BIT #2000, ISWR sSEE IF PRIN 
2239 007410 OO1004 BNE RRTYO. IF NOT: aR 
Seay Borate tee peace oH Hee : PRINT INAL ERROR MESSG 
234 8 phen peDSES RRTYO: CLR RFENT CLEAR ghist Count 
e243 007426 004737 007600 RRTY1: JSR PC, yz GO REREAD 
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RRTYe2: 


RRTY3: 


RRTY4: 


RRTYS: 
RRTYX: 


MULTIDRIVE DATA RELIABILITY EXERCISER 


#MSG71,R4 
PC. TTOUT 
RTCNT,R3 
PC, 
#4" RTCNT 
raty} 
#MSG72, R4 
PC TTOUT 
R4 
BORTY1 (RY) 
RRTYX 
#2000, SWR 
RRTYS 
#MSG73, R4 
PC. TTOUT 
RTCNT.R3 
pc. octp 
GORTYL(RY) 
RRTYFL 
PC, CKSWR 
PC 















MACY11 27(732) O4-NOV-76 11:29 PAGE $9 
sBUMP RETRY COUNT 

sae ERROR? 

:SEE IF PRINT? 

IF NOT: 8R 

;PRINT FAILED RETRY MESSG. 
;PRINT RETRY NUMBER 

;DONE 4 RETRYS? 

sIF NOT: BR 

;PRINT SUSPECT HARD ERROR MESSG. 
;BUMP HARD ERROR COUNT 

;SEE IF SHOULD PRINT? 

;IF NOT: BR 


; TYPE SUCCESSFUL RETRY MESSAGE 
;PRINT RETRY COUNT 

; INCREASE SOFT ERROR COUNT 
;CLEAR RETRY FLAG 

60 CHECK FOR ¢ 
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5 RARREEEREREEER AREER AERA EEE E ER EREL ES EEE EERES EES EEE 
; YOZZLE SUSROUTINE: 


THIS SUBROUTINE ENTERED aldh, SUITCH FIVE (5), IS USED TO PERFORM 
iA CONTINUOUS READ AND R OF THE CURRENT RE-ORD ON TAPE. 


SOR HOF VIA “CBABOLE hia teat 11) 1) ARO THIRTEEN (13). 
18, SO THARE De ACH 


Coa. RATION AND. MAY BE PUARTED Y TYPING 

GN RLC ON OTHE TTY AND ENTERING A VALUE IN RESPONSE 
Q THE PRINTED REQUEST. 

 SSAESEODEAEESEAETSHESEAAOSOSSOSESEESEEEEEEEAELEREOSESS 


YO2: MOV #1, aTKS ;SET TTY ENABLE 
MOV YSTAL, STAL 
JSR PC, STALL :D0 YOZZLE STALL 
YOZ0: HOV #1, amc ;SET TO I RECORD SPACING 
YOZA: MOVB #l2.anic ;SET TO SPACE REVERSE 
YOZB: #Y02C .RTRN *SET RETURN ADDRESS 
OV #177775,STAL | :SET TIME MULTIPLIER 
T :GO YOZZLE 
yO2C: MOV YSTAL,STAL 
SR PC, STALL ;D0 YOZZLE STALL 
MOVS ROCMD, aMTC *SET READ COMMAND F OR R 
MOV #RDATA, IMDA *SET READ ADDRESS 
MOV CARCNT, aMWC :SET CHARACTER COUNT 
TST TMFLG -IS IT A TM? 
Q yO2C1 IF NOT: 
MO #-2, IMC SET FOR TM 
TST STCOFL ; SEE IF 7 TRK CORE DUMP 
BE YO2C1 IF NOT: 
INC amc :SET TO ONE CHARACTER 
YOZC1: MOV #Y0ZD, RTRN :SET RETURN ADDRESS 
IMP TAPG G0 YO 
Y0ZD: BIT #4000, JSWR SEE IF ERROR CHECK 
BNE YOZE IF NOT: 
ISR PC, ERCHK sELSE GO CHECK ERRORS 
YOZE: TST RRTYFL :IS IT 
BEQ YOzEI IF NOT: 
YOZE1: BIT #20000, JSWR ; SEE IF SHOULD CHECK DATA 
BNE YOZF ‘IF BR 
JSR PC, DCHK ELSE a5 CHECK para 
YO2F: JSR PC’DS3 :GO CLEAR DATA 
TSTB 43s aTKS 3 SEE IF HAVE NEM STALL VALUE 
BPL ¥026 NOT: 
CMPB =s- #203, aTKB cre IF CONT C 
BNE Y026 IF NOT: BR 
MOV #MSG44, RY 
JSR PC TTOUT sPRINT YSTALL REQUEST 
MOV YSTAL,.R3 
JSR PC, OcTP PRINT PRESENT TALL 
MOV RO’ TEMPS ;SAVE RO(REC CNT) 
MOV aySTAL, RS :SET ADDRESS OF YSTL 
MOV #6,R1 *SET NUMBER OF CHAR TO INPUT 
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T™,A,B8-11 TSO3 OR TUIO,N,W MULTIDRI VE DATA RELIABILITY EXERCISER MACYL1 27(732) OY-NOV-76 11:29 PAGE 61 
| DZtMHD.P11 ACTIL Hooks 





1 12702 177777 MoV sSET MAXIMUM LIMIT 
| S58 Gites 1 703 Obi 0b6 MOV 41000, R3 sSET MINIMUM LIMIT 
| 29430 019078 004737 JSR PC $60. GET _ VALUE 
e431 910102 Q po9718 MOV rete, RO TORE ROC ROCREC CNTR) 
10108 900137 IMP = -YOZ REET AR 
| 2433 O10l1e 032777 QO0040 170532 yOZG: BIT 840, dSwWR i SEE IF SHOULD CONTINUE YOZZLE 
| E434 910120 201287 BNE —- YO’ sIF $0: 
| e435 O101 12777 000100 170526 MOV #100, TKS SET TTY INTERRUPT ENABLE 
| g338 010230 O00267 RTS ss PC ;EXIT 


i i ne i re ees ee 





mene | oe eo ee ee ne ee eee 
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535 5 EERAHLEREREELALELLLLEEREL ELLA REALL RES LELAERELEELE LES 
ett ; BACKSPACE SUBROUTINE: 
e442 THIS SUBROUTINE IS USED TO PERFORM THE 
evs :BECKSPACE OPERATION REQUIRED BY THE READ 

4 TINE EITHER FOR READ FORWARD AFTER WRITING, 
2445 70R FOR CONTINUOUS READING OF C 
eve SHEN IN RE READ ONLY MODE WITH SWITCH FOURTEEN (14) 
e448 _ =R CHECK FOR RECORD COUNT ZERO IS MADE AT THE 
e449 *END OF THE SPACE OPERATION 10 ASSURE THAT PROPER 
2450 TAPE POSITIONING WAS 
pa STertrittirtitirit rt itriiiriiitritt titi tt titi tt itt tty 
2453 010132 005037 000726 BKSP: CLR HORFL sCLEAR HEADER FLAG 
e4s4 010136 013700 O00620 BO: MOV RCNT, RO 
e455 010142 005100 COM RO ;BUILD SPACE AMOUNT 
2456 910144 005200 INC RO 
2457 01014 005737 000760 TST EOTREC sSEE TF EOT WAS REACHED 
2458 10152 001407 BEQ BKO :IF NOT: 
2459 010154 013700 000760 MOV EOTREC, RO :GET SHORTENED BLOCK COUNT 
e460 010160 O42700 100000 BIC #100008, RO 
2461 O1C0164 o05400 NEG RO 
2462 019166 005037 000760 CLR EOTREC ;CLEAR EOT FLAG 
2463 010172 010937 000714 BKO: MOV RO, TEMP4 : SAVE BACKSPACE COUNT 
2464 010176 005737 O0064S TST TMEX 15 THERE A 
e465 Ol 001520 BEQ BOA F NOT: ar 
2466 910204 012737 000716 MOV #"SG63, EMADDR ;POINT TO TM SP ERROR MESG 
Sues pioees pia7en podeen 2 OSC HOY a1, areC RARECORD COUNT 
5ie8 Bt BSSq haar 000714 ADD TEMPS. RO j RO=RCNT-BACKSPACE CNT FOR HEADER 
2470 010230 004737 O104G6 JSR PC, SP *BACKSPACE OVER 
2471 <.7234 032737 O00002 oo0746 BIT #2, BTFLG : WAS THERE _AN ERROR 
2472 O10e42 001401 BEQ BKi *IF NOT: BR 
2473 pipes 000207 RTS PC "ELSE RETURN WITH ERROR FLAG SET 
2474 01004 017737 470326 000740 BK1: MOV aNTS, ERSAV GET STATUS 
2475 010254 032737 D40000 000740 BIT #40000,ERSAV 31S TM SET 
2476 O10e62 001053 BNE BK3 IF SET: BR 
2477 010264 737 000726 BKIC: TST HDRFL ; ALREADY PRINTED HEADER? 
2478 019270 901014 BNE BKe 
24739 010272 032777 o02000 170352 BIT #2000, JSWR SHOULD PRINT? 
2480 010300 001040 BNE BK1B IF NOT: BR 
2481 0109302 004737 017506 ISR PC. PAPRT *PRINT HEADER 
2482 010306 013704 000716 MOV EMADDR, R4 sPOINT TO TM SP ERROR 
2483 010312 004737 020530 JSR PC, TTOUT *PRINT ERROR 

84 01031 022750 MOV #"5G23, R4 

eS Bt see 020530 Bke: JSR PC. TTOUT sPRINT COMMAND HEADER. 
2486 010326 017703 170250 MOV aMTC. R3 
2487 0103 l2 cLR 3 
2488 Ol BKIA: SWAB sPOSITION MOST SIGNIFICANT 
2489 010340 004737 O21144 JSR PC, DOUT : 
2490 010344 000303 SWAB :POSITION LEAST SIGNIFICANT 
431 O10346 737 021144 JSR PC, DOUT : PRINT 

4 1 737 000712 TST TEMPS *SEE IF PRINTED STATUS 
2482 010356 001011 BNE BK1B ‘IF SO: BR 
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gose37 o00712 INC TEMP3 SET FLAG 
12704 023135 MOV aS620 RY ‘PRINT STATUS HEADER 
004737 920530 JSR C, TTOUT 
170200 MOV ants, Ra *LOAD ST aTUS 
BR BKIA ie PRINT STATUS 
052737 OO00002 O0074 BKI8: BIS #2, BTFLG ‘SET BT FLAG (POSITION ERROR) 
207 RTS PC : RETURN 
eras 142121 000740 BK3: BIC #142121, ERSAV $100k FOR NON-TM ERRORS 
4 
eta 000760 TST EOTREC :WAS EOT REACHED 
001716 BEQ BKIC IF NOT: BR 
2737 o02000 000740 BIC #2090, ERSAV 5 CHECK | FOR NON-EOT ERRORS 
001312 SNE BKIC IF ANY: BR 
163700 000620 808: SUB RCNT,RO AGAIN RO=BACKSPACE COUNT 
012737 O22471 O00716 80A: MOV sMSGIO,EMADDR :POINT TO SE MES 
005200 INC RO *RO=BACKSPACE COUNT+! 
063700 ood620 ADD RCNT, RO :RO=RCNT-BACKSPACE CNT + 1 FOR HEADER 
013777 900714 170116 MOV TEMPS, aMWC 
013737 000636 000730 SPSK: MOV TSTAL, STAL 
004737 O10634 JSR PC, STALL :D0 STALL 
170074 CLR ants 
105077 170072 CLRB = MTC 
052777 O00012 170064 Bis #12, MTC ;SET BACKSPACE OP 
012737 010536 haoved MOV #01? RTRN :SET RETURN ADDRESS 
012737 177377 000730 MOV #177377,STAL | 3SET INTERRUPT TIME MULTIPLIER 
000137 017006 : IMP TAP GO DO SPACE 
17701 170042 gl: MOV aMWC, RL LOAD SPACE COUNTER 
1426 BEQ B2 IF COUNT IS ZERO: BR 
002000 170100 BIT #2090, ISWR ; SEE IF PRINT 
001017 BNE BIA NOT: 
004737 017506 ISR PC, PAPRT tELSE PRINT SPACE ERROR 
013704 000715 MOY EMADDR, R4 
004737 30 JSR Tou 
012704 023631 MOV sriSG4S, RY 
004737 JSR , TTOU sPRINT SPACE COUNT HEADER 
005301 DEC 
005701 COM 
010103 MOV R1,R3 
737 020716 JSR PC’ OCTP PRINT NUMBER OF RECORDS LEFT TO SPACE 
012737 O00002 OO0746 BIA: MOV #2'BTFLG SET BAD TAPE FLAG 
013737 000636 000730 Be: MOV TSTAL, STAL :DO STALL 
004737 010634 JSR PC, STALL : STALL 
000207 RTS PC EXIT 
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005337 
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012701 


020240 
000676 Od00b2e 
4177777 | 012750 
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5 REARREE REE EKER EERE EEE EE EELS EERE EEE EES ERERE RAE PEE SEES 
; STALL ROUTINE: 


THIS ROUTINE IS USED TO PROVIDE a DELAYS 


78 TIME BY ENTERING CNTRL C ON THE T Y AND 
aera NEW VALUES IN RESPONSE TO THE REQUEST 


N 
;THE READ STALL AND THE WRITE STALL ARE DELAYS 
EXECUTED BETWEEN EACH RECORD OF THE ae BLOCK. 
THE TURN AROUND STALL IS EXECUTED EACH TIME 
; THE DIRECTION OF gs MOVEMENT IS CHAN NGED AND 
Q EACH TIME THE TAPE OPERATION CHANGES FROM 
SURITE TO READ OR READ TO WRITE. 
$s EE te IS EXECUTED ONLY DURING THE 
errttttiitittititiititiitiititiiittitiiitiitittitiiites 3 


DEC STAL 
BNE STALL ; DELAY 
Cc EXIT 


5 ERE E KAA EERE EEE EEA EEE E EEE ERE EA EEE E SEERA ALES 
; RANDOM CHARACTER COUNT GENERATOR: 


THIS wi ttes: ENTERED VIA CONSOLE SWITCH 


LIMITS ARE (2) 
(2000) OCTAL EHARECTERS PER RECORD. 
rittttittittiti ti ititit iit iittt ttt titi ttiti ttt 


MOV f- ;SET HIGH LIMIT 
MOV +4800 R2 *SET LOW LIMIT 

JSR PC, RAN GO GENERATE NUMBER 
MOV RANSAV,CARCNT SET CHAR COUNT 

MOV #t-1, PATS *PRESET DATA PATTERN 
RTS PC t EXIT 












000207 


5737 
1001 
000, 


™ 8 B- : 17503 OR TUIO,NW MULT 
acti HOOKS 


000001 


0005C0 
020240 
000676 000620 


000709 


ee 
4716 
000010 
00101e 


021624 
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5 EXKE RRA EE ELLER REESE EE ER EEE EA AE REE EEE R ERE EEE EEE ERE 
; RANDOM RECORD COUNT GENERATOR: 


THIS ROUTINE walks “= CONSOLE SWITCH SIX (6) 
BS USED TO ier ATE A —_— NUMBER OF RECORDS 


IT 
? RECORDS PER 
Ee EE HEHE een EEE 


MOV SET Lou LIMIT 
MOV sean: RI :SET HIGH LIMIT 

J PC, RANG :GO GENERATE NUMBER 
Mov RANSAV, RCNT $5] secon COUNT 


5 EERE ARE H EA EE EEE AHL E EEE EERE AEA R ERLE EEE EAE EE ERLE EEE 
; TEST CONDITION ENTRY ROUTINE: 


THIS ROUTINE IS USED TO ALLOW THE OPERATOR 
TO ENTER, AT THE TTY, THE NECESSARY PARAMETERS 
510 RUN THE PR RAM AS HE WISHES. 

“ROUTINE IS ORLY “ENTERED UPON GRITIAL STARTING 
>FROM LOCATION 200( 

THE MAIN PURPOSE OF surs ROUTINE Is $ 19 ESTABLISH 


RE 

UNITS MAY BE ENT D IN ANY "Eh CH 
ieee 6 cee FOR LEGALITY BEFORE BEING 
;UPON COMPLETION OF Li pevise TABLE, REQUESTS 
;ARE PRINTED FOR ENTRY OF THE NUMBER OF CHARACTERS 
;PER_RECORD AND THE NUMBER OF RECORDS PER BLOCK 
NEXT REQUEST IS FOR A PAT i NUMBER TO BE USED 


FOR WRITING AND CHECKING OF READ 

‘THE LAST REQUESTS ARE FOR ENTRY OF THE DESIRED 

‘WRITE AROUND STALLS. 

PF erTTiT Titi rier t rit i tri Teri iti ttt tt ttt ttt ttt ttt) 
TST TINF ;SEE IF SH SHOULD INPUT FROM TTY 
BNE TINPA iT : 

RTS PC 

CLR UNP Stee TABLE POINTER 
LR REOTC AR EOT UNIT COUNTER 
MOV #10, RO CET SIZE OF TABLE 

MOV #UNL, RI :SET START OF TEBLE 

CLR (R1)+ CLEAR TABLE 

DEC RO SEE IF DONE 

BNE TINPB IF NOT: BR 

TST ASEOF SEE IF AUTO SEQUENCE 
BEQ ~: TINPBL IF NOT: BR 
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OZtMAD.P11 1 HO aks 


2639 010766 012704 024733 MoV #SG77,R4 
2640 010772 004737 020530 JSR PC TTOUT sPRINT AUTO SEQ PROGRAM NAME 
2641 019776 O00410 oR TINPO . 

642 011000 G1e704 o23144 TINPB1: MOV #MSG31,R4 

643 011004 004737 020530 JSR PC TTOUT ;PRINT PROGRAM NAME 
2644 611010 012704 023261 MOV WdG3iA RY 
2645 011014 904737 020530 JSR PC, TTOUT :PRINT REST OF TITLE 
2645 011020 122737 OO0004 OO0D41 TINPO: CMPB #¥: oat _. $SEE IF LOAD MEDIUN 
2647 011026 O01006 BNE 1 ,°. $TF NOT: BR 
2648 011030 012704 026120 MOV #MSG97, R4 
2648 011034 004737 020530 ISR PC TTOUT sELSE PRINT NO TEST 
2650 O11040 000137 oO4ES2 IMP REOTIO :END TEST 
2651 O11044 012704 O25255 1S: MOV #MSG84,R4 

S2 611050 904737 020530 ISR PC. TTOUT ;REQUEST STARTING REGISTER ADDRESS 
2653 011054 013703 OO0600 MOV MTS,R3 
2654 011060 737 O20716 JSR pc. OcTp :PRINT CURRINT REGISTER START 
2655 011064 090674 MOV REGST,RS :SAVE ADDRESS LOCATION 
2656 011070 O1e701 o00006 MOV 1 :SET 
2657 011074 177770 MOV 4127770, R2 -SET UPPER LIMIT 
2658 011100 012703 170000 MOV #170000, R3 -SET LOWER LIMIT 
2659 011104 737 O20272 JSR PC, TTR ;G0_GET RESPONSE 

011110 012705 o00602 MOV aMTC.RS :SET TABLE BASE 
2651 011114 013704 oO00600 MOV MTS. R4 :GET INITIAL ADDRESS 
es62 011120 062704 o00002 23: ADD #2, R4 BU MP ADDRESS 
2663 011124 010425 MOV RY, (RS)+ FILL TABLE 
2664 O11126 Oe0S27 000614 CMP RS; sMTRD+2 DONE? 
2665 011132 001372 BNE 2$ IF NOT: BR 
2666 011134 012704 025300 MOV #MSG8S, R4 
2667 911140 004737 020530 JSR PC TTOUT ;REQUEST VECTOR ADDR. 
2668 011144 013703 OO0614 MOV vECT,R3 
26639 011150 004737 020716 JSR PC, o¢TP ;PRINT CURRENT VECTOR 
2670 O11154 012705 o00614 MOV #VECT,RS >SET SAVE LOCATION 
2671 O11160 O1e701 000003 MOV 3 >SET SIZE OF RSPONSE 
2672 O11164 012702 O00476 MOV #476, Re :SET UPPER LI 
2673 011170 012703 op0060 MOV #60,R ;SET LOWER LIMIT 
2674 011174 004737 O20272 JSR PC. TTR RES 
2675 911200 013700 000614 MOV VECT, RO GET VECTOR ADDR ESS 
2676 011204 Ole72e0 017466 MOV #MTIAT, (RO)+ ; LOAD VECTOR WITH HANDLER ADDR. 
2677 Olle10 012710 000340 MOV #340, (RO) LOAD PRIORITY LEVEL 
2678 011214 737 O2lb24 TST ASEQ iSEE IF AUTO SEQ 
2679 O11220 001403 BEQ TINPOO IF NOT: BR 
2680 Ollece 005726 TST (SP)+ RESET STACK 
2681 011224 000137 o21252 JMP ASEQ GO TO AUTO SEQ 
¢ 82 011230 012704 023314 TINPOO: MOV #"SG32, R4 
2683 011234 004737 020530 JSR PC. TTOUT ;PRINT UNIT NUMBER REQUEST 
2684 011240 005037 000710 CLR TEMP2 :CLEAR BUFFER 
2685 011244 012705 000710 MOV STEMP2, RS *SET UNIT DESCRIPTION BUFFER ADDRESS 
2686 011250 012701 000001 MOV #1,R1 ‘SET NUMBER OF CHARACTERS TO INPUT 
2687 011254 Ole702 000007 MOV #7’ R2 SET MAXIMUM Urn IT 
2688 11260 012703 000000 MOV #0;R3 :SET MINIMUM LIMIT 
2689 Ollc64 004737 920272 JSR Pc’ TTR ; 60 GET UNIT NUMBER 
2690 011270 37 000706 TST TEMP] E IF HAVE NEW PARAMETER 
ge3 bie? 001014 BNE TINPOB IF SO: 
11 37 000734 TS :SEE IF FIRST ENTRY 

2693 011302 001002 BNE TINPOA :IF NOT: BR 
2664 011304 000137 011230 IMP TINPOO ELSE RETRY | 
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003012 


167154 


000616 


_ ee ee ee te ee ee 2 ee ee 


TINFOR: 


TINPCE: 


TINPOC: 


TINP2: 


TINP2A: 


TINP2B: 


TINP3: 





MULTIORIVE DATA RELIABILITY 


MoV 
mov 


MOV 


NP_R 
22469 
10, R32 
PC Teds 
UNI (RO) 
nea 
TINPOD 
STAL 
TINPOC 
#MSG49S, R4 
TTOUT 


RO, REOTC 
#45G35,R4 





UNI (RO) 


UOES 
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;SET END UNIT TABLE 
;G0 GET RECCRD COUNT 


;CLEAR UNIT NUMBER 
;SET ROTATION FACTOR 
7G9 L HY NUMBER TO PROPER POSITICN 


- 
w 


; SELECT UN 
;LO08D UNIT NUMBER 

;SEE IF UNIT AVAILASLE 
IF FO: BR 


; DELAY 
sPRINT UNIT NOT AVAILABLE 


7RED 
sSEE IF 7 CHANNEL 
sIF NOT: 

7 CHANNEL MSG 


39 CHANNEL MSG 

;G0 PRINT 7 OR 9 CHANNEL 
;PRINT DENSITY REQUEST 
;CLEAR BUF 


;SET NUMBER OF CHARACTERS TO INPUT 
;SET MAXIMUM LIMIT 

;SET MINIMUM LIMIT 

;G0 GET DENSITY 

soe ir HAVE NEW PARAMETER 


ZELSE CLEAR OLD PARAMETER 

:SET POSITION FACTOR 

:G0 LOAD DENSITY INTO PROPER POSITION 
sPRINT PARITY REQUEST 

:CLR BUFFE 

:SET R OF CHARACTERS TO INPUT 
:SET MAXIMUM LIMIT 

:SET MINIMUM LIMIT 


AC 
TY TO PROPER POSITION 
COUNTER 


E 

IF UNITS 
SO: pone 
NT TO NEXT UNIT 


FOR NEXT UNIT 
POINTER 


:P 
sE 


E LOOK 
;CLEAR UNIT 


;SET UNIT EOT COUNTER 


™.A,B-11 TSO3 OR TUIO, 
| OZtMHD.P11 acTi! 
11660 004737 
; eS) Baas 
soe3 Otiess Ot 
Stee otitoa Bisroe 
¢ 
011710 912703 
2758 011714 
| 5525 01] 13 
Pe fle bare 
soph BUSS Bocuse 
2763 O11742 O01 
2764 O11746 O04 
2765 1175¢ Ol 
| 576 011756 012701 
2767 011762 01 
Be He Be 
2770 011776 OOS4 
2771 012002 013737 
| 2772 O1e010 012704 
| 8773 012014 737 
2775 Bi stse phaeos 
«BR OtSS Se Bbdaas 
| 2777 012034 Ol270S 
«Bee SISRNG sens 
| 3780 BiSoen 012703 
2781 012054 004737 
 ~—B7B2 012069 012704 
| es biSoen 013703 
| 2785 012074 004737 
| B7BE pieioo 012705 
at Bisito stated 
| p789 Olelle o0S003 
2790 912114 004737 
2791 O12120 912704 
2792 Olele4 004737 
2793 012130 013703 
Ciel 34 004737 
en 12140 1270s 
27% 012144 Ole701 
| 2797 Oielsd 01 
«es biSté tae 
Be tain Bee 
| zee BIsI”N ae 
12200 004737 
2804 Oleco4 012705 
2205 OleciO 012701 
2606 Olecl4 Ole70e 


en te we ee 


=z 


= 
SF 


§ 


s 


ue 


— 


cosas 


tee 


Eas Bee 


~~ 
io” 


Se 


R 
an 
uw 


So 


000642 


oo0e44 


TIORIVE DATA RELIABILITY EXERCISER 


sR PC, TTOUT 
MOV RCAT.R3 
JSR PC OtTP 
MOV BRCNT, RS 
MOV #6 Rl 
MOV s-| Re 
MOV 81,83 
JSR PC’ TT 
MOV PEAT RCSA 
MOV 8MSG36 
JSR PC TTOUT 
NEG CARCNT 
MOV CARCNT, RB 
ISR Pc. OCTP 
MOV eCARCNT, RS 
MOV 86, R1 
MOV #4000, R2 
MOV #4,R3 
JSR PC’ TTR 
NEG CARCNT 
MOV CARCNT, CCSAV 
MOV 637 
JSR PC. TTOUT 
MOV PATRN.R3 
ISR Pc, octp 
CLR DOFL 
MOV 8PATRN, RS 
MOV #2,R1 
MOV #15, Re 
MOV #0,R3 
ISR PC’ TTR 
MOV 8MSG69 
JSR PC TTOUT 
MOV TMEX, R3 
JSR pc, otTP 
MOV sTHEX,RS 
MOV #1,R1 
MOV R1,Re 
SRB TTR 
MOV 9M5G39, 94 
JSR PC. TTOUT 
MOV SPFLG,R3 
JSR Pc, octp 
MOV #SPFLG,RS 
MOV #1,R1 
MOV 1, Re 
MOV 40, R3 
JSR PC’ TTR 
TINP4: HOV atSG40 RY 


a ee ew ee 2 ee 
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;PRINT RECORD COUNT REQUEST 


;PRINT RECORD COUNT 

;SET RECORD COUNT ADDRESS 

;SET NUMBER OF CHARACTERS TO INPUT 
MAXIMUM LIMIT 

;SET MINIMUM LIMIT 

;G0 GET RECORD COUNT 

;SAVE RECORD COUNT 


;PRINT CHARACTER COUNT REQUEST 


;PRINT CHAR COUNT 
;SET CHARACTER COUNT ADDRESS 
;SET NUMBER OF CHARACTERS TO INPUT 


: OUNT 
;PRINT PATTERN NUMBER REQUEST 


A FLAG 
R ADDRESS 
NUMBER OF tact TO INPUT 


is 


Sens 


;PRINT SINGLE PASS REQUEST 


;PRINT CURRENT FLAG SETTING 
3GET FLAG 

;SET SIZE OF RESPONSE 

SET UPPER LIMIT 


{SET LOWER LIMIT 
$5 GET RESPONSE 
SPRINT READ STALL REQUEST 


;PRINT READ STALL 

;SET READ STALL ADDRESS 

;SET NUMBER OF CHARACTERS TO INPUT 
;SET MAXIMUM LIMIT 








a es i ee ce ee ee es ee een Cet ee ema oe. 


TM, A,B-11 TSO3 OR TUIO,N,W 
OZ ?MHO.P11 ACTLI HOOKS 
2307 12220 012703 oo9901 
13555 Bisse4 gS3644 
3810 12834 004737 020530 
Ble SIs a rage 
as tie e aie 
2216 if 4 9} j 
2817 Olee70 O2027e 
2818 Olee74 012704 23556 
Ses3 OiSsey O13009 SaDe Se 
2821 Btsat0 004737 20716 
sa HES Get ies 
2824 pisses peeps i 
2825 012330 Ole703 900001 
2826 Ole334 OO4737 Oede7e 
Pee? Oles0 900207 : 
2828 
5354 
2831 O12342 O00241 
5235 pisseo poses COO7tO 
PES4 Oless2e 001372 
2835 912354 013700 900734 2 
26% 512360 953760 000710 o01012 
2527 Olesee 000207 


TPOS: 
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MUV #1,&3 sSET MINIMUM LIMIT 

ISR PC’ TTR :60 GET READ STALL 

MOV #5641, R4 

ISR ¢ TTOUT :PRINT WRITE STALL REQUEST 

MOV STAL.R3 

JSR PC. octP ;PRINT READ STALL 

MOV siSTAL,RS :SET WRITE STALL ADDRESS 

MOV #6,R1 :SET NUMBER OF CHARACTERS TO INPUT 
MOV s-1,Re :SET MAXIMUM LIMIT 

MOV #1,R3 :SET MINIMUM LIMIT 

JSR PC’ TTR :G0 GET WRITE STALL 

MOV amSc42, RY 

JSR PC sour ;PRINT TURN AROUND STALL REQUEST 
ISR PC, octP sPRINT TA STALL 

MOV Bs TSTAL, RS ;SET TURN AROUND STALL ADDRESS 
MOV #6,R1 :SET NUMBER OF CHARACTERS TO INPUT 
MOV a1, Re >SET MAXIMUM LIMIT 

MOV . #1,R3 :SET MINIMUM LIMIT 

JSR” PC TTR ?GO GET TURN AROUND STALL 

RTS PC EXIT 


;UNIT DESCRIPTION POSITIONING SUBROUTINE ##seeeeees 
CLC 
R TEMP2 ;POSITION CHARACTER 
NE TPOS 


8 
MOV UNP. RO NTER 
BIS TeNPe,UNL(RO) R INTO UNI(RO) 











- 








+ 2 ae ee - ee 
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DZTtMHD.P11 Til HOaKS 
2839 
a s ERAAHHEREASLELALALALELERESE LE LELAFLALSRRELE LES ERASE LS 
geil ;DATA SETUP ROUTINE: 
ees Tuts “art tS 0 GENERATE INTO THE ENTIRE 
OCTAL CHARA TERS) THE DATA PATTERN 
2845 :SELECTED BY THE OPERATOR. 
eee :DATA PATTERNS AVAILABLE ano” Ore Etec Ion (DATA PATTERN 0) 
soug HIGH SPEED PREER TAPE RERDER THIS TAPE MUST BE PREPARED 
2649 BY Using THE PROGRAM CALLED OTC. 
goo On DATA ay ALSO BE USED VIA CONSOLE 
Sur Ne 12 ALS USED TO CLEAR OUT THE 
if zs 5 HEE «i600 Berbe HARACTERS) BEFORE EACH 
esss ae RL ___ a 
see 012370 005737 913304 DSUP: TST ROFL ;SEE IF DID RANDOM DATA 
2858 012374 O01045 BNE DS! IF SO: BR 
22859 b1es76 005737 021624 oso: TST ASEOF ; SEE IF AUTO SEQ 
2860 O01 001406 BEQ A F NOT: 
2861 012494 005737 o00624 TST PATRN CEE IF AUTO RANDOM 
gobs 12410 100003 BPL DSOA IF NOT: 
12412 004737 013236 JSR PC, DATR ELSE GO GENERATE RANDOM DATA 
cere pies ae 000624 012750 fSOA ne PaTRN, PATS PATTERN? 
Sere Disuse poini4 Bre aoe 
2867 912430 O137L.. 000616 MOV iE UNIT DESCRIPTION 
2868 012434 042703 173777 BIC iaterd R3 *MASK P 
2869 012440 023703 012752 CMP PARS,R3’ *SEE IF SAME AS LAST TIME 
2270 012444 001404 BEQ :IF SO 
2871 012446 010337 012752 MOV R3, PARS SAVE PAR 
2872 Ole4Se 004737 013306 JSR PC; CRCLRC :60 EENERATE EXPECTED CRC/LRC 
2873 012456 000207 psOB: ARTS PC 
2874 O1e460 DSOC: 
2275 012460 912703 MOV #WDATA,R3 :R3 = ADDRS OF WRITE BUFFER 
2876 b1eHes 13701 MOV PATRN, Al *R1 = PATTERN SELECTOR 
2877 Ole470 010137 012750 MOV 1,Pats 
2878 012474 062701 000001 ADD *R1 ;BUMP POINTER 
2879 012500 900241 CLC 
2880 012502 006101 ROL R1 ;MAKE PATTERN SELECTOR EVEN 
2881 012504 000171 002734 . JMP QOATBL(R1) GO GENERATE PATTERN 
Pes82 012510 o00e40 DSi: NOP 
2283 012512 004737 013306 JSR PC, CRCLRC 
2884 012516 Ol2702 002002 DS3: MOV #2002, R2 ;R2=BUFFER SIZE + 
2e8s O01 b1e701 032212 MOV tROnTA, Rl ;RI=READ DATA ETaaT 
2886 O01 1 OS4: CLR (R1)+ *CLEAR BUFFER 
2887 012530 005302 DEC Re *SEE IF DONE ALL 
2888 012532 001375 BNE DS4 IF NOT: BR 
2289 012534 Ot 000616 012752 MOV UDES, PARS :SET PARITY 
2890 Ol2s42 37 173777 Ol2752 BIC 4173777, PARS 
2291 O12550 000207 RTS EXIT 
2292 
2293 





ee ee nn ee a ee en 0 ee ee ee 
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Stee. ACT11 4OoKS 

ooze sEXTERNAL DATA INPUT FROM H’S READER (256 CHARACTER MAXIMUM) 

$33 2552 7 012746 DATO: TST DOFL ; SEE IF SHOULD DO EXTERNAL INPUT 

2298 O12556 00135 BNE DS1 iF 

2899 O1e560 012737 000001 o1e74s MOV #1, DOFL SET EX XiEe NAL FLAG 

2300 012566 166076 CLR aPRB LEAR READER BUFFER 

2901 Ol2e572 005077 166070 cLR PRS cL LEAR READER STATUS 

Ente BIG 005037 706 CLR TEMP! *CLEAR FOR USE AS CHARACTER FLAG 
1 186056 DATOA: BIS #1, JPRS :START READER 

2304 012610 005037 000714 CLR TEMPY 

2305 012614 012704 009004 MOV #4, RY ;SET UP READER DONE DELAY 

2306 O12620 032777 O00200 166040 DATOS: SIT #200, JPRS :SEE IF DONE 

2907 Olebe6 001006 BNE 1$ : BR 

2908 012630 005337 000714 DEC TEMPY 

2903 012634 001371 BNE DATOB :DELAY FOR READER DONE 

2910 Ol2636 005304 DEC RY 

2911 012640 001367 BNE DATOB sCONTINUE DELAY 

2312 Oiebie 000722 BR DS1 IF READER NEVER DONE: 

2913 012644 005001 18: CLR Ri *CLEAR SAVE LOCATION 

2314 O1264%6 117701 166016 MOVB  @PRB,RI *SAVE CHARACTER 

2915 Ole6S2 005737 000706 TST TEMP ; SEE IF HAVE FOUND START CHARACTER 

2916 O12656 O010le BNE DATOC : BR 

2917 O12660 105701 TSTB 1 SEE IF CHARACTER IS 0 

2918 Ol2662 001747 BEQ TOA ‘IF SO: 

2319 O12664 012737 000001 000706 MOV $1, TEMP "ELSE SET CHARACTER FOUND FLAG 

2320 012672 010137 000710 MOV RI; TEMP2 :SAVE DATA SIZE 

Se eae Te Bate gD rfeet bana co 

5255 DIeveN fiDiES paroc: HOVB Ri. (Ra)+ 

2324 012708 005302 DEC cee IF READ ALL 

2925 Ste710 001334 BNE DATOA IF NOT: 

2926 Ole7le 012701 o26200 DATOD: MOV suDATA,R1 *R1 = START OF WRITE BUFFER 

2327 012716 013702 0090710 MOV : Re = SIZE OF DATA FIELD 

2928 012722 112123 DATOE: MOVB (R1)4°(R3)+ :REPEAT LOAD OF DATA FIELD 

2929 012724 Oeer03 032212 CMP #ROATA, R3 j SEE IF DONE 

23930 912730 BGT DATOF F NOT: BR 

2931 Ole732 000137 o12510 IMP DS1 bey IT 

2932 012736 005302 DATOF: DEC :SEE IF AT END OF DATA FIELD 

2923 012740 001370 BNE TOE *IF NOT: BR 

2934 DierHe 900137 o12712 IMP DATOD ELSE RESTART FILL 

2935 012746 090000 DOFL: 0 EXTERNAL DATA FLAG=1 IF ALREADY DONE 

293% 012750 177777 PATS: -] 

2927 012752 177777 PARS: -] 


a ee en ee ee ee 


en eee 


| 
| 


7803 08. 
Bee BaRobt S03 OB PHONY 
2949 
2941 . 
5 HE REY EO 
2o44 Ole7e4 010123 
ex5 O1e765 90s302 
Poue O1 001375 
2947 Ole772 000137 o12510 
5545 
2350 
3851 012778 O0S001 
SS 013000 000127 012760 
Dacs 
2956 013004 012701 ocO0cd! 
2957 O13010 00241 
2258 O1a0le 01 oo4co4 
12016 110123 
2960 013020 108101 
2961 013022 905302 
| 9863 013024 001374 
| 2963 O13G26 000137 012510 
| BSe4 
| 2965 
| BEE 
| 232 913032 12701 900376 
| 3968 O13036 00261 
| 969 013040 000137 o12012 
| Ba7g 
| 2971 
| 2372 
| 2973 
| 2974 012044 012701 952525 
| Ba75 913050 000137 012760 
| Be75 
| 3977 
| 3978 
| 2979 013054 912701 125252 
| 680 613060 000137 012760 
Beet 
_ ‘Bags 
283 
 B9B4 013064 012701 125125 
| 2985 012070 000137 O12760 
| 2987 
a: 
| 2983 12074 12701 Dseese 
2990 012100 000137 912760 


DATe2: 
DAT3: 


DAT3A: 
DATSE: 


DAT4: 


DATS: 
DATE: 
DAT?: 


DATO: 
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sALL ONES#eeeenaeee 


MOV ;R1=DA 

Noy tahoe R2 iBA=0RT8 COUNT +2 
MOV R1, (RA)+ :LOAD BUFFER 

DEC Re’ sSEE IF DONE 

BNE DATIB : T: BR 

JMP DS1 : 

SALL ZEROS##xeexxEHH 

CLR Rl ;R1=DATA 

JMP DATIA sLOAD BUFFER 
s;WALKING ONE S#e#eee4%% 

ot: #1,R1 ;R1=DATA 

MOV Rive BE ;R2=CHARACTER COUNT+4 
MOVB (R3)+ LOAD 

ROLB :SET NEXT CHARACTER 
DEC iy : SEE IF DONE 

BNE DAT3B :IF NOT: BR 

JMP DS1 RETURN 

sWALKING ZERO###eeeEHEH 

MOV #376,R1 ;RI=START OF DATA 
JMP DAT3A ;LOAD BUFFER 
sALTERNATING ONE/ZERO#RHHREEEE 

MOV #52525,R1 ;RI=DATA 

JMP DATIA ;LOAD BUFFER 

; ALTERNATING sushsendiaamaitiai 

MOV #i2SeS2,R1 3R1=DATA 

JMP DATIA ;LOAD BUFFER 
;ONE/ZERO IN ALTERNATING CHARACTERS#xxxxxeREx 


MOV #125125,R1 ;R1=DATA 
JMP DATA ;LOAD BUFFER 


;ZERO/ONE IN ALTERNATING CHARACTERS##xexexax# 


MOV #52652,R1 ;R1=DATA 
JMP DATIA LOAD BUFFER 
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sALL SITS O-377eeaeeeeeae 
DAT1i: CLR Ri ;RI=STARTING DATA 


oo4oo4 MOV S4004 Fy !RE=CHARACTER COUNT+4 
DATIIA: MOVB  R1, (R3)4 ;LOAD BUFFER 
INCB ORL :BUMP DATA 
BE OBATIUA sSEE IF Oe 
012510 IMP sé: : ; 
sALL BITS 377-Deeeeneenee 
900377 DAT12: MOV #377,R1 sRI=STARTING DATA 
MOV #4004, Re ;Re=CHARACTER COUNT+4 
DATI2A: MOVB R1,(R3)¢ “LO BUFF ER 
DECBSéRRS :BUMP DATA 
DEC R2 SEE IF DONE 
BNE DAT12A -IF NOT: BR 
012510 IMP 0S! RETURN 
s;ALTERNATING CHARACTERS 0 AND 377#eexReEREX 
000377 DAT13: MOV #377,R1 sR1 = DATA 
012760 IMP DATIA :LOAD BUFFER 
sALTERNATING CHARACTERS 377 AND Dxxxxexxexe 
177400 DATI4: MOV #177400,R1 sR1 = DATA 
012760 IMP DATIA LOAD BUFFER 
;WALKING ZERO REPEATED FOUR TIMES#exxxexxxe 
002 DATIS: MOV R of of WORDS 
raed DATISR: MOV ti7zate, Rl SET Ste STAR 
oooog2 DATISA: MOV *SET NUMBER OOF R REPEATS 
DATISB: MOV ai faa)4 +P aD NOAT A 
DEC Ro’ *SEE IF DONE 
BNE DATISC IF NOT: 
012510 IMP DSi RETURN 
DATISC: DEC RY 3 SEE IF DONE REPEATS 
BNE DAT1SB :IF NOT: BR 
ROL ;SET NEXT PATTERN 


Rl 
BCS DATISA ;SEE IF SHOULD RESTART 
013176 JMP DATISR ;I1F SO: BR 


ee ne ee ee ee ne a a a ee ee i a a ee 


™,€,8-11 TSO3 OR Ti8, N,W_ MULTIDRIVE DnTA RELIABILITY EXERCISER MACYLI1 27(732) O4-NOV-76 11:29 PAGE 74 
| OztMAD.P11 HOOKS 
/ 3039 
340 ;RANDOM DATA GENERATOR SUBROUTINE S#seeeee* 
3042 013236 013704 oDds22 DATR: MOV CARCNT, RY sSET SIZE OF RECORD 
2043 O13eH2 012793 O2620 MOV sWDATA, R3 :SET ADDRESS OF START OF BUFFER 
132% Ol2701 1777 MOV #-1,R1 :SET HIGH LIMIT 
3045 O13eSe o2 CLR Re :SET LOW LIntt 
046 13254 737 020240 DATRO: JSR PC, RANG :GO GENERATE NUMBER 
3047 013260 013723 000676 MOV RANSAV,(R3)+ LOAD BUF 
3048 013264 INC RY ;SEE IF DONE ALL 
3049 O13¢66 091 3NE DATRO IF NOT: 
: 1 904 012510 ISR PC,DS1 :GO CHECK 7 CH 
3051 013274 012737 900001 013304 MOV #1, RDFL SET SRNCOM Bara FLAG 
3052 013302 090207 RTS PC 
613304 90900 ROFL: 0 TRGNOOM DATA SELECT FLAG 


— a en ee ee 





T™™,A,8-11 TSO3 OR TULO,N.W MULTIORIV 


DZtMAD.P11 ACTIL HOdKS 
3054 
3055 
ape 
3058 
3059 
see 
3063 013306 oo0240 
3064 013310 012700 oo0sbe2 
3065 013314 905400 
3066 013316 012701 o26200 
3067 1332 d0St37 013674 
she 913355 ARIS 1 3¢20 
3070 013334 004737 013650 
| 3071 013340 000241 
355 Bt asda tat 
3074. 012346 052704 o00400 
0133S2 00241 
013354 10405 
| 77 013356 O42705 177703 
| 3078 013362 005105 
3079 013364 042705 177703 
| 3080 013370 O42704 00074 
| 306s pt BI baa? 013674 
Bt aae piesa 
| 3084 013404 OD1402 
Be RS ae ee 
| 3087 013416 005137 013674 
3088 O13422 042737 177050 
| 08S OID ONe7O4 177727 
| Sar Blade bravay biser4 
| 3092 O1344— 013700 O00622 
| 3093 o13452 905400 
| 3084 013454 12701 26200 
| 3095 913460 013674 
| 3096 013464 111104 
| 3097 013466 004737 013522 
_ 3098 013472 004737 013650 
| 3099 013476 005300 
| 3100 013600 001371 
| 3101 613502 013704 013676 
| 3102 013506 004737 013650 
| 3103 013512 013737 013674 
' 3104 013520 000207 
| 3105 013522 005704 
_ 3106 013524 o01010 
| 3107 013526 37 oo4o00 
3108 013534 001404 
3109 013536 012704 ocoo420 


cote eee eee eee 


013674 


013676 


013700 


000636 


CRCLRC: 
CRLR: M 


CLO: 


CLi: 


Cie: 


CLLAST: 


CL3: 


CLP: 


E DATA RELIABILITY EXERCISER 


MACYI1 €7(732) 
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 RERHRLER ELE LEA AL ALLE RELEASE LALA LALLES RELAEL FEA ELS SAFFEE 


3 CRC/LRC CHARACTER BUILD; 


THIS ROUTINE WILL CONSTRUCT AND SAVE THE EXPECTED 


sCRC 


SIZE IF OPERATING IN 
iti ttitittiitiiiritiititirttitrttititttitir test ite: 


CARCNT , RO 
#WDATA,R1 
XORS 
(R1),R4 
Pc,cLP 
PC, XOR 

RY 

CLe 
#400, R4 


¢ 
XORS, RM 
#177050, XORS 
#177727,R4 
RY, XORS 
XORS EXCRC 
CARCAT, R 
RO 
#WDATA, RL 
XORS 
(R1),R4 
PC, CLP 
PC; XOR 
RO 
CL3 . 
EXCRC, RY 
PC. x0 
XORS, EXLRC 
PC 
R4 
CLPE 
#4000, UDES 
CLPE 
#420,R4 


;SET RECORD SIZE 
;SET START OF BUFFER 


160 et Pee R 
T PARI Y OF CHARACTER 


rotate} 
;1F_NO CARRY: 
;SET BIT NINE 


;D0 EXPT LRC 


;GET PARITY 
;XOR CHARACTER 


;00 ALL FOR LRC 


1 RIGHT 


;SAVE CHARACTER 


;XOR CRC TO DATA 


; SAVE EXPT LRC 
SEE IF 0 CHAR 


AND LRC CHARACTERS ogy a TQO_DATA AND 
: RECORD NRZ MODE 


;COMPLEMENT BITS 2,3,4,5 


;IF_LAST CHARACTER: BR 
;GET NEXT 


;COMPLEMENT ALL BUT SITS 385 
;SAVE EXPECTED CRC 


IF NOT: BR 
;SEE 4 EVEN PARITY 
SET O CHAR EVEN PARITY 
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poten Pty ACTI1 HOOKS 
3110 o13542 o0S201 INC RI ;BUMP POINTER 
3111 013544 000207 RTS PC :RET! 
ile 138 Gb3037 013710 CLPE: CLR PARCNT *CLEAR BIT COUNTER 
113 01 1 005010 MOV #10.83 :SET NUMBER OF BITS 
3114 O13¢56 704 Oc00001 CLPO: BIT #1.R4 -SEE IF ONE BIT 
| 3115 013562 1402 BEQ CLP} ‘TF NOT: BR 
116 bt 7564 > 013710 INC PARCNT :BUMP COUNTER 
He Biaese 04 wtwia. foe ROTATE TO NEXT BIT 
a8 b13674 Soesb3 DEC R3 E 
120 013576 00136 BNE CLPO sCONTINUE FOR ALL BITS 
3i21 O13600 112104 MOVB  (R1)+,R4 
i 1360e e704 77400 BIC #177400, R4 
i i o00i 013710 BIT #1, PARCNT ;SEE IF ODD NUMBER OF ONE BITS 
31 12614 901005 BNE CLPe2 : : 
| 2125 013616 03737 o04090 o006:5 BIT #4000, UDES SEE IF SHOULD BE EVEN PARITY 
i ; + 
3/58 13S ¢ eating RTS ¢ ‘ELSE EXIT 
| 3128 013630 032737 SO4O00 O00616 CLP2: BIT #4000, UDES ;SEE IF SHOULD BE ODD PARITY 
3128 013636 00 BNE CLP3 IF NOT: BR 
i l RTS PC ELSE EXIT 
13 164 oco400 CLP2: B15 #400,R4 ‘SET PARITY BIT 
1 1 sbu6 RTS 
i 1 10446 XOR MOV RY, -(SP) 
, 3134 913652 043716 013674 BIC XORS, (SP) 
| 3135 Ot O43? 013674 BIC RY, XORS ;XOR SUBROUTINE: R4 WITH XORS 
3138 g 013624 BIS (SP)+. XORS 
| 3 1 13704 013674 MOV XORS, RY 
| 3138 913672 000297 RTS 
«HY Bar pe a. BCPA one 
te pt3878 eat XLRC: : ‘EXPECTED LRC 
- 3143 013702 009000 ACTLRC: 0 SACTUAL LRC 
/ 3144 013704 000000 LRCSV: O : AVE 
| 3145 013706 900090 LRCPT: Q :CRC PRINT FLAG 
| giv 912719 000800 PARCNT: 0 :PARITY COUNTER 
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OZtMHD.P11 actil HobK 


“ 
318  FHALRAELELAREELEL ELE LEELELE LE LLLLERESLELESRLLELF SELES 
150 ;DATA CHECK SUBROUTINE: 

1 Tg TI D 70 COMPARE EACH CHARACTER 
313s oF Bae ReaD Sof see tf THe e EXPECTED CHARACTER. 
3154 RROR DETECTED W 0 BE 
3155 On Aes TO AN ERROR Bernt’ SUBROUTINE O END 
3i5 *SUBROUTINE TO ACCUMULATE THE NUMBER OF BITS 

157 s DROPPED AND FICKED UP FROM EACH CHARACTER. 

3158 *DATA CHECKING MA ¥ BE _TERNINA TED BY USE OF 

3159 :CONSOLE SWITCH THIRTEEN (13). : 
aie0 HEHEHE EHH HEHEHE io 
3182 013712 005037 900722 DCHK: CLR BBC ;CLEAR BAD RECORD CNTR 

3163 013716 095037 000744 CLR DERFL CLEAR DATA ERROR FLAG 

3164 013722 005037 000726 CLR HDRFL ; CLEAR HEADER FLAG 

3165 013726 013705 O00ee MOV CARCNT, RS OAD CHAR COUNT 

3166 Bt 3758 012701 S26200 MOV DATA; RI ?SET WRITE DATA ADDR 

3167 013736 Ole702 O3221e2 MOV #RDATA’ RE :SET READ DATA ADDR 

3168 012742 032737 OO400D codes BIT #4000, UDES :SEE IF EVEN PARITY 

188 013750 oor BEQ IF NOT: BR 

i70 Ol 737 OD1010 TST STCOFL :SEE IF 7 TRK CORE DUMP 
3171 013756 001032 DFO IF SO: BR 
172 013760 12703 000377 MOV #377, R3 
31 13764 O42 177400 BIC #177400, R3 sBACKGROUND DATA MASK 
3174 013770 032777 20 164602 BIT #20, IMTS ; SEE IF 7 TRK DRIVE(NORMAL) 
3175 013776 001402 BEQ A IF NOT 
3176 914000 042703 o00300 BIC #300 R3 * MASK FOR 7 TRK NORMAL DATA 
3177 O14004 130311 DFA: = BITB (R1) ‘SEE IF ZERO CHARACTER 
3178 014906 001404 BEQ Ree 
3179 014010 1 INC of ; BUMP POINTER 
3180 O14012 oos205 OFB: ING RS SEE IF DONE 
3181 014014 001373 BNE DFA tIF NOT: BR 
3182 014016 OO0406 BR DFD 
3183 014020 112721 000020 DFC: MOVB  #20,(R1)+ sREPLACE O WITH 20 
3184 bide) 012737 177777 012750 MOV 8-1) PATS SET TO GENERATE NEW PATTERN 
2185 014032 000767 BR FB’ 

3186 014034 013705 oDDs22 OFD: MOV CARCNT, RS RESET COUNT 

3187 014040 012701 Oe6200 MOV SWDATA’R1 RESET ADDRESS 

3188 O1 164526 OFO: #$ BIT #20, MTS SEE IF 7 TRACK 

3189 014052 001403 BEQ ‘IF NOT: BR 

3190 OOS 005737 Oo01010 TST STCDFL ; SEE IF 7 TRK CORE DUMP 
3191 O14060 001417 BEQ ? T: 

3192 Ol 122122 DFS: CMPB (R1)+,(R2)+ CEE IF DATA IS GOOD 
3133 O14 4 001003 BNE FQ] IF NOT: BR 

i94 O14 i 000722 CLRB BC ELSE CLEAR BAD RECORD COUNTER 
ti bf ag74 are 14656 OF91 an PC, ORPKF DROPS AND PICKS 
31% 14100 ata CREE JSR PC’ DERR 88 pe pe ERROR 
3198 014104 912737 OO000] ooo744 MOV #1; DERFL ‘ BATA ERROR FLAG 
3199 O14i12 o05205 OFS2: INC RS’ SEE IF DONE aL CHARACTERS 
3200 O14114 001362 BNE DFS ‘IF NOT: DO ALL 
3201 O14116 000432 BR OF3 
3202 014120 oo0d240 DF7: NOP 
2203 Ol4le2 010137 o14240 MOV R1,STAS ;SAVE CHARACTER ADDRESS 





4 


mee ee a a ee ee ee ce ES Seen eee eens 


3204 


a 


fo 
it) 


foro rorurare 
ODOT 


psararataraets 
0 IOUT £C WIT 


seel 


GJ) 
Lat) 
res 


—— 


0 
014240 


H,8.8-11 TS03 OR TU10.N 
OZtMHD 


7 
000000 
oo0000 


1 HOOKS 


000106 
000300 


014236 


000744 
000742 


000734 
901134 
O221e6 


014236 


000744 
000040 


W_ MULTIDRIVE DATA RELIABILITY EXERCISER 


MOVB = aSTAS,STCS 
BICB #300, (R1) 
MPB R14, (Re)+ 
E F7I 
CLR8 BBC 
BR DF72 
OF71: JSR PC, DRPKF 
J5R PC’ DERR 
MOV #1; DERFL 
F72: NOP 
BISB  STCS,aSTAS 
INC RS 
BNE DF? 
DF3 TST DERFL 
BEG OFX 
TST SERFL 
BNE OFX 
MOV UN? RY 
INC DATERI (RY) 
JSR PC, CKSUR 
DFX: RTS PC 
STCS: 
STAS: 0 


= ee ee ee ee 


MACYI1 27(732) 





Fos, CHARACTER 
MASK FOR 7 TRACK DRIVE 
SEE, It F era IS GOOD 


; CLEAR "bab RECORD COUNTER 


369 00 et AND PICKS 
:GO_PRINT ERROR 
;SET DATA ERROR FLAG 


;RESET DATA 

iSEE ae DONE ALL 

:SEE IF HAD DATA ERROR 
:IF NOT: BR 


;IF NOT DATA ERROR ONLY: BR 


foe DATA _— COUNTER 
CHECK FOR tG 


;EX 
2 TRACK DATA SAVE 
;7 TRACK ADDRESS SAVE 
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OZtMAD.P11 ACTII HooKs 


3227 
32 8 5 FEAARRERELL LEE REALL EL ELRELE LAR ELREELES RLELELELEELE LEE 
$223 ;DATA ERROR SUBROUTINE: 
3537 ‘THIS SUBROUTINE IS USED TO PRINT QUT ANY 
$32 “ERRORS FOUND DURING THE DATA CH 
3 TEACH CHARACTER FOUND BAD WILL BE PRINTED 
3234 IN BIT FORMAT ALONG WITH ITS EXPECTED CHARACTER. 
AN ERROR HEADER CONSISTING OF THE U 
?BLOCK NUMBER, RECORD NUMBER, SIZE OF RECORD. AND 
3237 ERROR TYPE (READ FORWARD, WRITE ) 
3238 :IS PRINTED ONLY ONCE FOREACH RECORD FOUND BAD 
33 *@ COUNT IS MADE OF THE NUMBER OF SUCCESS 
3240 : CHARACTERS IF TEN (10) SUCCESSIVE BAD CHARACTERS 
354] "ARE FOUND IN @ SINGLE RECORD, A ME 
3545 °@ BAD RECORD CONDITION IS PRINTED 
‘TWENTY (20) CHARACTERS ARE SKIPPED BEFORE CHECKING 
3244 : SUMED. THE BAD RECO NDITIO 
3245 :THREE TIMES IN A RECORD EMAI I 
*SKIPPED EXCEPT THE FINAL TEN (10) CHARACTERS 
3247 ‘THIS SKIPPING IS OF COURSE ONLY POS 
3248 : S WHICH CONTAIN A SUFFICIENT NUMBER OF CHARACTERS. 
3249 :PRINTING OF ERRORS MAY BE DISALLOWED AT ANY 
3250 ;BY SETTING CONSOLE SUITCH TEN (10 
3251 :THE OPERATOR MAY CAUSE THE PROGRAM TO HALT ON ANY ERROR 
3252 *BY SETTING CONSOLE SWITCH FIFTEEN (15) TO A ONE. 
a523 HBG HEHEHE HEHE GI 
3255 914242 032777 GO2D00 164402 DERR: BIT #2000, ISWR ;SEE_IF SHOULD PRINT ERRORS 
3256 O14250 o01402 BEQ DERRO :IF 
3257 O14252 000137 014400 INP DERRY *ELSE SKIP PRINT 
3258 014256 005237 000732 DERRO: INC PFLG :SET PRINT FLAG 
3259 Ol42b2 005737 000726 TST HDRFL ; SEE IF HAVE PRINTED HEADER 
3260 O14266 001013 BNE DERROA BR 
3261 014270 005737 oo0742 TST SERFL ALREADY PRINTED HEADER? 
3262 014274 001010 BNE DERROA IF SO: BR 
3263 014276 004737 017506 JSR PC, PAPRT ‘PRINT CYCLE NUMBER 
3264 O10 Ole? 022426 MOV #M5G1.R4 LOAD TERROR MSG ADDR 
3265 014306 004737 O20S30 JSR PC, TTOUT ‘PRINT ERROR 
3266 014312 004737 016742 ISR PC’ FRPRT ‘PRINT F OR R 
3267 O14316 012704 O2244s DERROA: MOV #MSG4, RY 
3e68 014322 004737 020530 JSR PC, TTOUT ;PRINT CHAR NO. HEADER 
3269 014326 010203 MOV R2’R3 
3270 0 4330 162703 032212 SUB 8ROATA, R3 ;POINT TO CHAR 
3271 014334 005303 DEC R3 
3272 014336 004737 020716 DERROB: JSR PC ocTP ;PRINT CHAR NUMBER 
3273 014342 012704 022433 MOV G2,R4 
3274 014346 004737 020530 JSR PC TTOUT ;PRINT EXPECTED DATA 
3275 O143S2 114103 MOVB =-(R1),R3 LOAD EXPECTED DATA 
3276 014354 604737 021144 JSR PC batt :GO PRINT CHAR 
3277 Gi83se0 912704 O224un MOV #MSG3, RY 
3278 014364 004737 020530 JSR pc. TOU i ;PRINT RECEIVED DATA 
3278 14370 114203 DERRI: MOVB (Re) 
2 14378 004737 021144 DERR2: JSR Pc, DouT ;PRINT BAD CHAR 
281 014376 leelee DERR3: CMPB pe BOUT ‘RESET POINTERS 
3282 O14400 105237 900722 DERRY: INCB BBC :BUMP BAD RECORD CNTR 
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ACTII GObKS : 
122737 0000310 score2 CMPB 4S séw 10. 88 -SEE IF BLD STH 
Bole nn KS BNE - - DEREX IF NOT: 68 
832777 O0e000 184230 BIT $2000,dSWR . ;SEE IF PRINT INHIBIT 
} 3 SNE 1$ :IF SO: BR 
lero4 O22526 MOV aMSGIS, 4 
737 920530 JSR PC TTOUT :PRINT BLD 8TH 
cS037 bere 18 tire 4s gg iRESET BAD RECORD CNTR 
7 SWAB =s« BBC :POSITION BLD STH AMOUNT 
105237 0007 = INCB 0s ;BU OUN 
le27s? o0g722 CMP8 42s 3, BEC :SEE IF HAD 3 BLD BTHS 
01937 SHI DERRYE :TF NOT: BR 
e332 909788 Swa8 «BEC ‘REPOSITION SBC 
age” 1777 : * #177767, RS :SEE TF ON LAST EIGHT CHARS 
= 177767 MOV #177767,R5 :SET CHAR CNTR TO 8 
1 p00622 900705 MOV CARCNT, TEMP1 *LOAD CHAR COUNT 
005137 900756 COM Tene 
tEssae Serta 000706 iN #10. TEMP) sPOINT TO BUFFER -8 
013701 600706 MOV TEMP1.RI *POINT TO NEXT CHAR 
j #WDATA.RI *POINT TO NEXT WRITE CHAR 
013702 000706 MOV TEMP1 Re ‘POINT TO END OF READ DATA -8 FORWARD 
062702 O322l2 sRDATA, :POINT TO NEXT CHAR 
5 33 ss 900919 DERRYA ae oe Ae ECT NT TO THE END OF READ DATA -8 REVERSE 
ae O3221é ADD SRDATA, Re “POINT TO THE NEXT CHAR 
900415 BR DEREX EXIT 
pb337 000722 DERRYB: Shee BBC REPOSITION BBC 
062705 oo00e4 ADD #24, RS sSKIP 20 CHARS 
103405 BCS DERRE sIF EXCEED RECORD SIZE: 8R 
062701 o00024 ADD #24,R1 SKIP 20 CHARS 
62702 poode4 DERRS: BOD sed Re :SKIP FORWARD 20 CHARS 
Bro70e 177777 DERRS: MOV 8-1, RS -SET TO EOR 
036772 100090 164034 DEREX: BIT #100000,aSWR § ;5EE IF SHOULD HALT ON ERROR 
1412 SEQ DEREX1 IF NOT: BR 
000009 HALT 
005737 090732 TST PFLG ;SEE IF PRINTED 
90) 006 BNE DEREX1 IF SO: 
002000 164014 BIT #2000, ISWR :SEE IF SHOULD PRINT 
091002 SNE DEREX! ‘IF NOT: BR 
600137 14256 IMP DERRO ELSE PRINT 
0047 2120 DEREX1: JSR ¢, CKSWR TEST FOR ¢G 
005037 000732 CLR PFLG CLEAR FLAG 
000207 RTS PC RETURN 


- a 


i 
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3331 f PEREEEREERESER REELS SEES SSE EEERESSE EES ER ELSESES ESE SESS 
; DROPS AND PICKS SUBROUTINE: 


33 THIS SUBROUTINE IS USED TO ACCUMULATE FROM 

3335 H BAD DATA CHARACTER FOUND THE NUMBER 

3336 Felts WHICH WERE EITHER DROPPED OR PICKED UP. 

3337 THO COUNTERS ARE USED TO ACCUMULATE THIS 

3228 NFORMAT CAN STORE UP T p 

3339 ae PICKS BEFORE OVERFLOWING If OVERFLOW IS 

3240 :ABOUT TO OCCUR, THESE ACCUMULA 

2341 PRINTED IN OCTAL_AND RESET TO ZERO. 

3342 :THE CONTENTS OF THE ACCUMULATORS MAY BE 

3343 :DISPLAYED AT ANY rite BY SETTING CONSOLE 

3344 ;SHITCH FOURTEEN TO A ONE (1). THE PRINTOUT WILL OCCUR 

3345 T THE END OF THE OCORRERT BLOCK CYCLE. 

ani Sepunecahananainnsunsnnaaaeanzeienenteieunaninundentiel 

3348 O14656 9005037 DRPKF: CLR TEMP] 

3349 O14662 005037 00071 CLR TEMP 

3350 O14666 005037 on0712 CLR TEMPS 

3351 014672 013704 MOV UNP. RY . 

3252 O14676 016437 001034 900770 MOV PIKI(R4), BPKP 

3353 014704 016437 001054 OO07&5 MOV DRP1(R4)’ BOPP 

3354 O14712 Leatae CMPB 4s = (RI) , -(R2) :POINT TO CHAR 

3355 014719 1121 MOVB (R1)4, TEMP] LOAD GOOD CHAR 

3356 014720 112237 10 (R2)+’ TEMP2 *LOAD BAD C 

3357 014724 004737 014736 DRPK: JSR Pc, OROP ‘GET DROPS 

3358 914730 o04737 015156 J5R PC’ PICK GET PICKS 

3359 014734 000207 RTS PC 2EX] 

3360 014736 113703 000706 DROP: MOVB § TEMPI,R3 *R3 = GOOD CHAR 

3261 O14742 113704 O00710 MOVE TEMP" RY RY = BAD C 

3362 O14746 140403 DPC: BICB  RY,R3 :GET DROPS/PICKS 

3363 014750 001001 BNE ppt IF SOME: BR 

3364 014752 RTS PC * RETURN 

3365 014754 012737 000010 000736 DPCG: MOV #10, BCNT *SET NUMBER TO CHECK 

3366 014762 136703 000001 DPCO: BITB  #1,A3 *SEE IF DROPPED OR PICKED THIS BIT 

3367 914766 001455 BEQ ppte2 IF NOT: BR 

3368 014770 105737 000712 TSTB = TEMP3 >SEE IF ON PICKS 

3368 014774 001016 BNE DPC1 IF SO: BR 

$370 14776 163764 INC a8OPP ‘BUMP DROP CNTR 

3375 Dieohe 100046 BP. ODBCE, = TNO. OVERFLOW: BR 

3373 615010 002000 163634 BIT #2000, JSWR :SEE IF HAVES SRINTED DATA 

3274 015016 14a BEQ DPCOA IF SO: BR 

2375 015020 004737 017506 ISR PC, PAPRT *PRINT CYCLE NUMBER 

327 b150e4 004737 OlS222 opcoA: JSR PC’ DPPRT “PRINT DROPS AND PICKS 
15030 9004 SR ppt2a 

3378 015032 eitead 163732 OPC1: INC aBPKP ;BUNP PICK CNTR 

3379 150% 005777 163726 TST JBPKP IF OVERFLOW 

3360 O1 100027 BPL DPC2 tif NOT: BR 

3381 015044 032777 002000 163600 BIT #2000, ISWR ; SEE IF HAVE PRINTED DATA 

28 15052 01408 BEG DPC1A SO: BR 
15054 737 017506 SR PC, PAPRT SPRINT CYCLE NUMBER 

2384 015060 004737 915222 DPCIA: JSR PC’ DPPRT :PRINT DROPS AND PICKS 

2385 O15064 013704 000734 DPC2A: MOV UNP, R4 





TM.A,B-11 TSO3 OR TUIO,N.W MULTIDRIVE DATA RELIABILITY EXERCISER 
| DZtMHD.P12 ACTLI HOOKS 
3396 015070 O16402 001054 MoV DRPI(RY) RB 
$28, gibors 1s404 O51024 MOV PIKI(RY) /R4 
15100 012737 10 000736 MOV 810, CNT 
3383 O13! 2 DPC28: CLR (R35¢ 
| 3 1311 écR sR) 
; 3391 O51] 009736 DEC CNT 
| 3392 015116 9013 SNE DPC28 
3393 015120 002 RTS PC 
332 oi8t oops wn ie 
339% 0151 000736 DEC BCNT 
3397 015132 900141 8&9 DPC3 
3398 015134 000770 #2, BPKP 
| $33 DIbINe Oberg? OoDoDe O0U7ée ADD ae 
90 615150 000137 O14 J opto 
3401 015154 900207 DPC3: RTS PC 
| 3402 015156 013704 000734 PICK: MOV UNP. R4 
| 3403 bide 016437 001034 009770 MOV PIKI (RY) ,BPKP 
' 3404 015170 016437 901054 000766 MOV DRP1(R4) BDPP 
| 3405S 015176 113704 000706 MOVE = TEMP1,R4 
| 3406 015202 11 000710 MOVB - TEMP2’R3 
| 3497 915206 iie730 000001 000712 MOV 1, TEMP3 
3408 015214 014746 JSR PC’ DPC 
| 3 i8 piesse Seat 023113 DPPRT Soy SmSG2e RY 
| 3 
Mil presse pigs JSR PC TTOUT 
| g4i2 015232 013704 000734 MOV = UNP_ RY 
| 413 015236 016437 001054 o007&6 MOV DRP1 (RY), BDPP 
Eat discs 016437 001034 000770 MOV PIK1(R4)°BPKP 
15 Oo! 062737 16 000766 ADD #16, BDPP 
| s46 015260 062737 900016 900770 ADD #16; BPKP 
| 3417 915266 012737 10 000736 MOV 810° BCNT 
- 3418 015274 017703 163466 DPPRTO: MOV JEDPP, RB 
3419 015300 004737 O20? 16 JSR PC. octp 
- 3420 015304 005337 DEC BCAT 
eel 015310 001494 BEd DEPT! 
| ee O18 on a 000010 000738 DPPRT1 Soy iti BENT 
3425 pease 01 023124 MOV #45627, R4 
| 326 015334 pou? 37 020530 ISR PC. TTOUT 
| 34287 615340 017703 163424 DPPRT2: MOV DBPKP. RB 
3428 015344 004737 020716 JSR PC, oct 
3429 015350 005337 000736 DEC BCAT 
3430 015354 C0144 BEQ DPPRTX 
31 015356 162737 o00002 000770 SUB 82, BPKP 
3432 g1564 000765 BR DPPRT2 
2432 015366 900207 OPPRTX: RTS 
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;SET DROP POINTER 
;SET PICK POINTER 
;SET NUMBER 0 


i] 
: ICK 
sSEE IF DONE 
: IF were Ss 


. 3R3 = HAR 
;SET PICK FLAG 


;GO CHECK PICKS 
sEXIT 


;PRINT DROP HEADER 
;SET DROP POINTER 
;SET PICK POINTER 


;SET NUMBER TO PRINT 


POINTER 
; NUE FOR ALL 8 BITS 
;SET NUMBER TO PRINT 


;PRINT PICK HEADER 
;PRINT PICKS 

: F DONE 

;IF SO: BR 

; POINTER 

sCONTINUE FOR ALL § BITS 
;RETURN 


:Z 
D 


35 
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Eee 


a LIN, 


Desseeonss 


a 


EURRTERCBGO URES Aaae oes Same tetY 
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CTL1 HOOKS 
s SRFFHRAERERASER AEA ALL ALLELE LEA RE SEARLS ALL SL ASSES EASES FASS 
;STATICSTICS PRINT 
STHIS SUBROUTINE PRINTS THE ACCUMULATED 
ERROR Staristics FOR EACH DRIVE. 
:THE ROUTINE CAN BE CALLED ro O PRINT 
:AT THE END OF EACH SELECTING 
: SHINEI THE cCMMRY wee rere" 
: PRINTED FOR A A ORIVE Ws 
IS REWOUND F 
 esuuepaueseuacsesanesssuessesesensuaseneonneciunneeussé 
012700 00000: ‘ PRSTAT: MOV #1,R0 sSET RECORD COUNTER TO 1 
994737 017506 ISR PC’ PAPRT “PRINT CYCLE NUMBER 
094737 015222 PRSTA2: ISR PC’ DPPRT :PRINT DROPS AND PICKS 
012704 O2e4475 MOV eMSG64, RY 
004737 620530 ISR Cc. Trou ;PRINT WRITE ERROR TAG 
013704 000734 MOV 
016403 901074 MOV WTERI(R4Y) ,R3 
004737 020716 ISR C,OCTP ;PRINT WRITE ERRORS 
012704 024722 MOV #M5G76,R4 
004737 020530 JSR PC TTOUT ;PRINT RETRY TOTAL 
013704 000734 MOV RY 
O1B403 001154 MOV RTYI(R4Y) RB 
004 020716 ISR PC, OCTP sPRINT RETRIES 
012704 024506 MOV #MSGES, RY 
004737 020530 ISR PC. TTOUT ;PRINT READ ERROR TAG 
01 090734 MOV UNP 
016 001114 MOV RDER1(R4),R3 
004737 020716 JSR PC, OCTP ;PRINT READ ERRORS 
012704 024700 MOV #M5G74, RY 
004737 020530 JSR PC Tour ;PRINT SOFT ERROR MESSAGE 
eee ote HOY Hicrw, R3 
pAes3 rewat JSR Pe, octP ;PRINT SOFT ERROR NUMBER 
012704 024711 MOV 
004 JSR PC aS, BN ;PRINT HARD RD ERROR MESSG 
1 34 MOV RY 
16 1214 MOV BORTY1(R4) ,R3 
737 020716 JSR TP ;PRINT HARD RD ERROR COUNT 
Oi 17 MOV #MSG66,R4 
te JSR PC TTOUT ;PRINT DATA ERROR TAG 
13704 34 MOV RY 
016403 001134 MOV DATERI(R4),R3 
O73? 020716 JSR PC, OCTP s PRINT DATA ERROR NUMBER 
004737 O1S606 JR PC’ BTPRT PRINT BAD TAPE STATS 
004737 O22120 ISR PC; CKSWR CHECK FOR ¢ 
RTS PC * RETURN 
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3483 
zie ;BAD TAPE STATISTICS PRINT##eeeeeeee 
1 ? 900754 BTPRT: CLR RTYFL 
Sug? Bieeis biero4 peas REL ey 
3483 bless 904737 5 30 ISR PC TOUT :D0 CR/LF 
3 i ieee neath 000762 MOV 1 A) ;SET TABLE POINTER 
3491 015634 017703 163122 MOV JETPT,R3 
3132 S1Se4C oops CLC 
3493 01564 ROR R3 sCORRECT NUMBER 
3494 015644 020716 JSR PC, OCTP ‘PRINT NUMBER OF BAD SPOTS 
35 15650 pews MOV #MSG6S, R4 
% O1 7 05 JSR PC. TTOUT :PRINT BAD TAPE TAG 
3497 15660 005777 163076 TST aetPT i SEE IF ANY BAD SPOTS 
3i38 S668 00 NE Brovo tIF SO: BR 
3500 biee 35 013701 000762 BTOVO: MOV STPT RI ;SET TABLE POINTER 
3501 015674 TST (R1)+ 
1 CLR RO 
1 1 BTCV1: MOV RO,R3 
Te ers gba R R3=R3/2 FOR CORRECT NUMBER 
a4 OIE rb 020716 5 B OcTP ‘Baint Ente SONEER 
015712 012704 O22513 #”5G13,R4 
3508 015716 105724 TSTB Os (RDS ;SKIP_CR/LF 
3509 b157e0 poy? 020530 SR PC, TTOUT ‘PRINT BLOCK NUMBER TAG 
3510 O1 111 MOV (RL). R3 
soi 2187e6 bow737 020716 SR PCAOUTP ;PRINT BLOCK NUMBER 
S15 aiesae eed BS5e36 JSR PC. TTOUT ;PRINT RECORD NUMBER TAG 
see ea 2 : oY #40,RI 
zie tte ba 020716 18K Pc. oct :PRINT RECORD NUMBER 
3517 0:5754 162701 OOOD40 SUB #40. Rl sRESET POINTER FOR BLOCK NUMBER 
#18 te * nad 162774 one RO See SEE IF DONE 
3520 Bt Soee 001405 BEQ BTbve ; 
3521 015770 012704 024530 MOV #MSG67,R4 
see 015774 737 020530 JSR PC TTOUT :D0 CR/LF 
016000 000737 BR BTov1 : CONTINUE 
3524 O16002 005737 000772 BTov2: TST BTSTF :SEE IF STAT ONLY PRINT 
016006 001002 BNE TOVX -IF SO: BR 
6160-0 004737 O16016 JSR PC, BTCLR CLEAR TABLE 
see 16014 000207 BTOVX: RTS RETURN 
3529 ;CLEAR BAD TAPE TABLE 
S23 = : 016016 012703 oo0041 BTCLR: MOV #41,R3 ;SET SIZE OF TABLE 
3532 Ol60e2 013704 000762 MOV BTPT. RY -SET POINTER 
3533 b160e6 o0s024 BTCLRI: CLR (R4)+ ;CLEAR ENTRY 
3534 016030 905303 DEC R3 * DONE? 
335 O16032 01375 BNE BTCLRI *IF NOT: BR 
336 016034 600207 RTS PC : RETURN 
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OztMéD.F 11 ACTIL HOOKS 
3537 5 FHERERAAEAALLSLSLELLA LALA TESLA LELA LFA AE SAA LALELEAAL ESSE 
#538 jREAD/ RITE STATUS CHECK SUBROUTINE: 
3549 THIS UBROUTINE IS USED TO PERFORM A CHECK 
3541 OF THE TAPE STATUS REGISTER FOR ERRORS AND 
3542 510. ASSURE A CORRECT CURRENT MEMORY ADDRESS 
3543 OF EACH TAPE 
44 SEERA ION H (READ Of WRITE) 
45 OR IS INDICATED BY BIT FIFTEEN (15) 
ISTER BEING SET, AN ERROR 
3548 RECORD NUMBER, RECORD “OI7E AND TYPE OF E 
3549 ‘WILL BE PRINTED FOLLOWED BY THE CONTENTS OF 
3550 ;THE COMMAND REGISTER AND STATUS REGISTER PLUS 
3551 ?THE CURRENT MEMORY ADDRESS AND CHARACTER CO 
3552 IF NO STAUTS ERROR IS INDICATED THE CHARACTER COUNT 
3553 SAND CURRENT MENORY ADDRESS ARE BOTH CHECKED AND 
3554 : THE ENTIRE PRINT OUT IS BNE IF tage ts IN ERROR. 
3655 ERROR 


INT 1 MAY a + D BY SETTING CONSOLE 


5 
35 C NG 
2218 $06 THe KoNeTS INE AP Garis ‘at i NUMBER, 
3556 “SWITCH TEN (10) TO A (1). 
3557 THE PROGRAM MAY BE HALTED ON if ERROR BY SETTING 
3658 *CONSOLE SWITCH FIFTEEN TO A ONE ( 
eP5 besser tnt eet rer eer ee 
| 3561 018036 013703 000622 ERCHK: MOV CARCNT, R3 ;GET CHARACTER COUNT 
| 3562 O16042 004737 O22120 JSR PC, CKSWR “CHECK FOR tG 
| 3563 016046 005037 000742 CLR SERFL *CLEAR STATUS ERROR FLAS 
| 3564 O160S2 005402 NEG R3 
3565 916054 005737 o00756 TST TMFLG 3A TM OPERATION? 
Be BS BEE ome HE cele 
| 2568 016066 005737 00101 TST STCOFL ;SEE IF 7 TRK CORE DUMP 
| 3569 016072 001401 BEG 1$ ‘TF NOT: BR 
| 3570 0160974 005303 DEC R3 :SET TO ONE CHARACTER 
| 3571 O16076 032777 OO00D4 162476 1S: BIT #4, OMTC :SEE IF A WRITE TM? 
$76 B1b1G4 00140 BEQ EROA IF NOT: BR 
16106 actie CLR R3 “ELSE CLEAR R3 
| 3874 01611 CO00D4 162464 ERCA: BIT #4, MTC SEE IF WRITE OP 
| 275 61 BEQ 
161 ADD SWDATA,R3 
| 3577 016124 000137 016134 IMP 1 
3578 O16130 2 : SRDATA,R3 ;ADD START OF BUFFER 
$373 bibl 1 16 ER! MOV , CADE *SAVE EXPT RODRESS 
016140 162442 R3, aMDA :SEE IF ADDRESS 0 
3561 016144 001105 ERe iE NOT: BR 
| 3582 016145 O1 162432 MOV IMWC, RB :GET CHARACTER COUNT 
| 3583 Ol6152 001102 3 IF NO 
| 3584 016154 005037 013706 CLR LRCPT ; CLEAR LPC PRINT FLAG 
3585 Oi6160 000004 162414 BIT #4. INTC ;A_WRITE OP? 
161 1045 BNE ERIB IF SO: 
| 3587 016170 032777 O00020 162402 BIT #20, IMTS ; SEE IF SEVEN TRACK DRIVE 
| 3588 Ott 001041 BNE ERI “IF SO: BR 
3589 1bs78 013737 013700 013704 MOV EXLRC,LRCSV :SET FOR EXPECTED LPC 
| 3699 Gie06 005737 000756 "ST TMFLG ‘1S IT 
| 3691 O18212 001404 EQ 1$ : IF hore "hr 
2592 016214 000432 BR ERIB 


2 


z 


“Oe~ 


=] 
ts 


HARRI 
BOGFALS 


BB ORAeB RCS 


SRRER ORR 
WODNMU£WlHO 


a a ED ED. 


FESeSOBRRS ERE RUN MRM 


KKK 
BVT 
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ll ACTII HOOKS 

O16216 912737 000023 013704 Muy #23, LRCSV USE TM LPC 

16224 013704 OO0616 1$: MOV UDES, RY -GET UNIT DESCRIPTION 
b15e30 pe704 eee BIC #117777,R4 :MASK DENSITY 

i 26704 000 CrP #60000, Rs SEE wf TRK DENSITY AT SCO BPI 
1 e545 77, 62342 013702 MOV aMTD,ACTLRC :GET ACTUAL LPC 
HES le MRS SIT Sy0000 050 SEE TF NOORTA CCE uy rapes 
bib260 bossa? 013706 INC LRCPT :SET LPC PRINT FLAG 

16264 042737 i 013702 BIC 8:77000,ACTLRC ;JUST 9 BITS 
Ol6272 023737 013702 013704 CMP ACTLRC,CRCSV  ;DOES ACTUAL AGREE WITH EXPECTED? 
016300 001027 SNE ‘IF NOT: BR 
016302 032777 100000 162272 ERIB: 8IT #100000,aMTC § ;SEE IF HAVE ERROR 
016310 o01002 BNE 1$ *IF SO: BR 
Ol63i2 000137 016720 IMP EREX 
016316 017737 900740 1S: MOV IMTS, ERSAV :GET STATUS 
016324 005737 000756 TST TMFLG :A TM OPERATION? 
016330 001404 BEQ ERIA 7 IF NOT: B&R 
016332 042737 O42125 000740 BIC #42125,ERSAV  ; IGNORE TM INDICATOR AND WAL 
016340 001567 BEQ EREX *TF NO OTHER ERRORS: BR 
016342 005737 000760 ERIA: TST EOTREC IS IT E0T 
Di6346 100004 BPL Re IF NOT: BR 
016350 042737 032125 000740 BIC #32125,ERSAV § ;IGNORE EOT INDICATOR 
016356 OO1SE0 BEG EREX ?TF NO OTHER ERRORS: 
018360 005237 000742 ER2 INC SERFL >SET STATUS ERROR FLAG 
016364 032777 O02000 162260 BIT #2000, 2SWR *SEE IF SHOULD PRINT ERRORS 
O1bs7e 00141 BEQ ER3 ‘IF SO: BR 

16374 000774 TST RRTYFL :SEE IF READ RETRY 
916400 001404 BEQ ER2A IF NOT: BR 
O16402 022737 000003 000752 CMP #3, RTCNT :SEE IF LAST RETRY 
016410 001402 BEQ ER3 IF SO: BR 
Ol64i2 000137 O16664 ER2A: INP EREXO *ELSE EXIT 
DibH1é 37 000722 ER3: INC PFLG :SET PRINT FLAG 

le422 004 017506 JSR PC, PAPRT ‘PRINT HEADER 
Oi6426 013704 000716 ER3A: MOV EMADDR, R4 
016432 004737 020530 ER38: JSR PC, TTOUT sPRINT ERROR HEADER 
016436 004737 016742 JSR PC’ FRPRT ‘PRINT F OR R 
bine Gieree Reres ties 

O164S2 4737 0205. JSR PC. TTOUT ;PRINT COMMAND HEADER 

O164S6 017703 162120 MOV antc, 

Ole462 000303 ER? 3 sPOSITION MOST SIGNIFICANT 
bieHed Oo47 a7 021144 JSR PC, DOUT :PRINT REGISTER 

164 3 *POSITION LEAST SIGNIFICANT 
016472 004737 021144 PC, DOUT :PRINT REGISTE 

016475 000712 TST TEMP *SEE IF PRINTED STATUS REGISTER 
Oi6s02 O010i2 BNE ERIO IF SO: BR 

016504 005237 000712 INC TEMPS SET FLAG 

016510 012704 023135 MOV #4SG30,R4 

016514 004737 020530 JSR PC. TTOUT sPRINT STATUS HEADER 

016520 017703 162054 MOV ants, R3 *LOAD STATUS REGISTER 

Oiese4 000137 016462 JMP ER? GO PRINT STATUS 

16530 012794 023643 ER1O: MOV #MSG46, R4 

016534 004737 020530 JSR PC TTOUT ;PRINT CHARACTER COUNT HEADER 
016540 917703 162040 — MOV IMWC, R3 

016544 005403 SET TO TRUE VALUE 





ae ee ee ee 
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pbtheB. B11? Rett Aboks : 


3649 O1b5u6 904737 020716 
Se fitee Bary bees 
16 17702 162 
3653 O16&66 004737 20716 
3654 Olb5/e 012737 o00255 
655 Ol 04737 020870 
3656 016604 013703 016740 
3657 016610 904737 O20716 
3558 Dib 4 057 013706 
1 1421 
3650 Ol6622 012704 025247 
3661 O16625 737 020530 
3662 016632 013703 013702 
3653 516636 004737 020716 
sb64 Oibb42 012737 
| 3666 Steed nie 13 
3667 O16660 004737 920716 
2668 O16664 032777 1000 
3669 O16672 O01412 
3670 016674 000000 
| 3671 016676 005737 000732 
| 3672 O16702 001006 
| 3673 016704 032777 o02000 
3674 O18712 oo1002 
| 3675 O16714 000137 o16416 
| 3676 016720 004737 022120 
| 3677 916724 00s037 000732 
| 3678 016730 017737 161644 
| 3679 016736 07 
2680 016740 o00000 
3681 
| 3682 
3683 
3684 
| 3685 
| 3686 
| 3687 
' 3688 
| 3689 
| 3690 
| 3691 016742 032777 oOD0004 
| 3692 016750 O01015 
+3693 016752 37 010000 
| 3694 016760 O01405 
«Be hee Bre GS 
| 3667 016772 G4 
| 3698 016774 012704 o2zesse 
' 3699 017000 004737 020530 
| 3700 017004 000207 


 _—_—_— —— oe 


000702 


000702 


161760 


161740 


000740 


161632 
000626 


EREXO: 


EREX: 


CADER: 


FRPRT: 


FRO: 
FREX: 


TAPE DIRECT 


wou? 4 
Pott out 


Pp 
aMTS,ERSAV 
PC 


MACYI1 27(732) 





;PRINT CHARACTER COUNT 
;PRINT ADDRESS HEADER 
;PRINT ADDRESS 

;PRINT / 


;PRINT EXPT ADDRESS 
SHES LPC a ED? 


;PRINT LPC TAG 
;PRINT ACTUAL LPC 
;PRINT - 


;PRINT EXPECTED LPC 
:SEE IF STOP ON ERROR 
IF NOT: BR 
fee IF PRINT 
; SEE IF SHOULD PRINT 
fi NOT: BR 

PRINT ERROR 
iGO a FOR tG 


L 
ICAVE STATUS REGISTER 
EXPT ADDRESS SAVE LOCATION 


5 RRR RA AAA ER EERE EERE ELE EE REE REEL EE AA ER ALAR EEE EEEES 
iF FOR FORWARD/R FOR REVERSE PRINT SUBROUTINE: 


THIS SUBROUTINE IS USED TO gt QUT THE 


ION USED WHEN ANY ERR 


sDETECTED IN ara OF READ OR WRITE, DATA, OR 
;SPACING OPERATIONS. 

FT ettittitrtititiittitititiiititiititittttitttt titties 
;SEE_IF WRITE COMMAND 

I BR 


ISEE IF READ REVERSE 
sIF NOT: BR 


#4, aMTC 
FREX 
#10000, ROCMD 
FRO 
#MSG17,R4 
PC. TTOUT 
FREX 


aHiSG16 RY 
, TTOUT 





;PRINT R 


;PRINT F 
XIT 
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3701 
ache OEE ye hee I nes ge Ot aoe mtr teinpensateeacane 
$0 APE COMMAND EXECUTE SUBROUTINE: 
3705 ae SUBROUTINE ‘ieseat TO EXECUTE T 
$08 ?MAG TAPE CONHEND CRIBED BY THE REA 
70: OR WRITE R MMA 
3708 ‘SENT TO THE DEVICE REGIST R ALONG WITH THE 
3003 s INTERRUPT ENABLE AND GO ’ 
371 CO ORTED. ORD SSUED, NIERRUBT 16 RETURNED 
le ae! 71h aut 9 COURS, GN ERROR WILL BE 
371 HE PROG er OPPED. “TESTING MAY 
3714 ED BY PRESSING THE CONTINUE BUTTO? 
3715 iF IN RIERRUEY HANDLERS ARE USED, ONE FOR MAG TAPE 
3716 AND ANOTHER FOR TELETYPE (TTY 
3717 ‘UPON RECEIPT OF A NAG TAPE INTERRUPT, HOUSEKEEPING 
3718 :I ORNED AND CONTROL RETURNED TO’ THE CALLING 
713 sROUTT (READ, WR 
720 >RECEIP ora etm IRtERRUer WILL CAUSE THE 
721 PROGRAM T CHECK FOR ENTRY OF A CNTRL C CHARACTER. 
3722 F NOT CNTRE C, THEN CONTINUATION OF WAIT FOR Mag 
3723 TAPE INTERRUPT 1S RETURNED. HOHEVER, ‘, 
3724 T UBS c ry oF A CNT 
| 3725 pile AT THIS TIME REOUEST ea OR NEW CTA VALUES 
26 “ARE PRINTED AND THE RESPONSES ENTERED. RESUMPTION 
| 3787 OF TAPE INTERRUPT WAIT IS THEN RE 
j 3758 Perret titi titi titer t ttt rit itt tttiteri ttt i ttt tte 
| 
' 3730 017006 005937 000706 TAPG: CLR TEMP 
| $3731 017012 013704 cod6oe MOV MTC, Re ;GET COMD REGISTER ADDRESS 
| 3732 017016 o05204 INC RY *BUMP TO 
| 3733 017020 113714 000617 MOVB UDES+1, (RY) *LOAD UNIT DESCRIPTION 
| 3734 017024 777 000200 161550 TAPGO: SIT #200, aMTC SEE IF HAVE READY 
| 3735 017032 001035 BNE TAGS 0: 
| 3736 017034 37 000706 INC TEMP ; SEE IF TIMED QUT 
| 3737 917040 001371 BNE TAPGO T 
| 3738 017042 004737 017506 ISR PC, PAPRT PRINT CYCLE NUMBER 
| 3739 017046 000004 161526 BIT #4’ OMTC *SEE IF WRITE OP 
' 3740 017054 O01405 BEQ TAPGI IF NOT: BR 
3741 017056 012704 o224se MOV #MSGS,R4Y 
| 3742 017062 004737 020530 JSR PC, TTOUT sPRINT WRITE ERR 
3743 017086 Ooo406 oe TAPG2 
3744 017070 012704 022457 TAPG1: MOV #MSG6,RY 
3745 017074 004737 Oe0S530 JSR PC, TTOUT ;PRINT READ ERR 
are 017100 004737 016742 JSR PC’ FRPRT :PRINT F OR R 
| 3747 017104 012704 023007 TAPG2: MOV #MSG25, R4 
| 3748 017110 004737 0620530 JSR PC, TT aut ;PRINT NO READY ERR 
| 3749 017114 o00000 TAPG2A: HALT 
3750 017116 005037 000734 CLR UNP sRESET UNIT POINTER 
3751 017122 000137 003264 IMP STAUTO *RESTART 
3752 017126 40 TAPG3: NOP 
3753 017130 ooce4D NOP 
| 3754 017132 005037 000706 CLR TEMP ;SET DELAY 
3755 017136 032777 O00100 161434 1S: BIT #100, MTS SEE IF SELR 
3756 017144 001013 BNE 2 IF SO: BR 


yoo ee as ee ee ee eee ee + ee. ee Ce ee ee + 

























[ 
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ZtMHD.P11 ACTL1 HOOKS 
3757 017146 005237 000706 INC TEMP1 
3758 0171S2 001371 BNE 1$ DELAY 
3753 017154 004737 017506 JSR PC, PAPRT ‘PRINT HEADER 
3789 017160 012704 o26020 MOV #5695, R4 
3761 bigs 004737 020530 JSR PC TTOUT :PRINT SELR LOST 
3762 017170 009137 O20050 IMP DRPDRV :GO DROP ORIV 
017174 905077 161450 2s: CLR aPSW - :SET TO PRIORITY 0 
3764 017200 090240 NOP 
3765 017202 0 NOP 
766 017204 052777 000101 161370 BIS #101, aMTC ;SET INTERRUPT ENABLE AND GO 
3767 Ol72ele Ole704 O20000 MOV #20000, R4 
3768 017216 905003 CLR R3 
3763 017220 o00004 161354 SIT #4, IMTC ;SEE IF WRITE OP 
3770 bi 7ee o01042 BNE TAPGS ‘IF SO GO TO WRITE EOT WATCH 
3771 017230 005303 TAPGY: DEC R3 
3772 017232 001376 BNE TAPGY 
3773 017234 005304 DEC RY ;SEE IF TIMED OUT 
3774 017238 001374 BNE TAPGH 
' 3775 017240 012777 900340 161402 TAPGS: MOV #340, aPSW sRESET PRIORITY 
3776 9172% 042777 OO00100 161326 BIC #100: aMTC “CLEAR INTERRUPT ENABLE 
3777 017254 002000 161370 BIT #2000, JSWR *SEE IF SHOULD PRINT ERRORS 
3778 Ol7262 OO1014 BNE TAPGE *IF NOT: BR 
3779 017264 737 017506 ISR PC, PAPRT :PRINT CYCLE NUMBER 
3780 017270 013704 OO0716 MOV EMADDR, R4 
3781 017274 004737 020530 ISR PC, TTOUT sPRINT ERROR OP 
| 3782 017300 004737 O16742 JSR PC’ FRPRT *PRINT F OR R 
| 3783 017304 012704 622757 MOV #MS$Ge4, R4 
3784 017310 737 020530 JSR PC. TTOUT sPRINT NO INTERRUPT 
917314 09 161320 TAPGS: BIT #100000,aSWR © ;SEE IF SHOULD HALT ON ERROR 
| 3786 O173ee 1401 BEQ TAPG7 LIF NOT: BR 
17324 HALT 
| 2788 017326 o00e40 TAPG7: NOP 
| 3789 017330 000177 161370 JNP ORTRN sRETURN TO CALLING ROUTINE 
017324 000010 161236 TAPGS: BIT #10,aNTS :SEE IF SDWN SET 
| 3791 617342 OOi01e BNE § :IF SO: BR 
| 3792 017344 002000 161226 BIT #2000, 2MTS *SEE IF EOT REACHED 
| 3783 017352 001404 BEQ 1 IF NOT: BR 
| 3734 017354 o00001 017402 BIS #1,WEOTF :SET EOT FLAG 
| 3785 017362 BR 2g 
| 3796 017364 005037 017402 i$: CLR WEOTF ;CLEAR FLAG 
| 3797 017370 2s: DEC 
| 3798 017372 001360 BNE TAPGS : DELAY 
| 3799 O1 DEC RY 
| 3800 O1 001356 BNE TAPGB DELAY 
3201 017400 000717 BR TAPGS 
| 3802 017402 op0000 WEOTF: 0 
| 3803 
{ 
| 


oo ae ee + + ee ees 
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Sethe. Pll ACTII HOdKS 
3804 
ag ; TTY INTERRUPT HANDLERS#2eee442% 
3807 O1740s 012777 000340 161236 TTINT: MOV #240, JPSW sRESET PSW 
3808 O1741l2 005077 161240 CLR aTKS CLEAR TTY STATUS 
3803 i?4lg 2777 000203 161234 CMP8 = #203, aTKB :SEE IF CONT C 
3810 O174 1404 SEQ TTINTO IF SO: 
3811 017426 004737 O22120 JSR PC, CKSWR :GO CHECK FOR ¢G 
3812 017432 od0240 NOP 
3813 017434 o00dc2 RT sELSE RETU 
3814 017436 010037 oo0712 TTINTO: MOV RO, TEMP3 :SAVE ROC bes CNTR 
3815 OieiHe 4737 012164 JSR PC’ TINPY G0 GET STALL VALU NES 
3816 017446 013700 o00712 MOV TEHPS,RO ‘RESTORE ROCREC CNTR) 
3817 617452 005077 161202 2 CLR aTKB -CLEAR TIY SUFFER 
3818 917456 012777 OOO10O 161172 MOV #100, TKS ?RESET INTERRUPT ENABLE 
2813 017464 ae RTI : RETURN 
3821 ;MAG TAPE INTERRUPT HANDLER####xx24%x 
355 DI7466 022626 MTINT: CMP (SP)+ (SP)+ sRESET STACK POINTER 
3824 017470 O4e777 OOO0100 161104 BIC 00, aNTC *RESET INTERRUPT ENABLE 
3825 017476 ocde40 NOP 
3826 017500 op0e40 NOP 
3827 017502 177 161216 IMP ORTRN : RETURN 
| 3829 j BELEK AREA ERE E LEAR KLEE LE EAA KEE EA EERE AEE ELLA EEE EEEEEE 
| 3830 ; ERROR HEADER PRINT SUBROUTINE: 
3832 THIS ROUTINE IS USED TO PRINT OUT A HEADER 
3833 ;WITH EACH ERROR MESSAGE. THE PRINT IS IN Tuo 
3834 LINES AND CONTAINS THE FOLLOWING INFORMATION 
| $835 STINE 1: UNIT NUMBER DATA PATTERN NUMBER 
| 3836 ‘LINE 2: CURRENT BLOCK NUMBER, RECORD NUMBER IN 
3827 j WHICH THE ERROR OCCURED PLUS THE TOTSL NUMBER 
| 3838 RECORDS IN THIS BLOCK, THE RECORD SIZE (NUMBER 
| 3839 OF CHARACTERS) AND THE ERROR TYPE (READ,WRITE, SPACE, ETC) 
| 3840 ;PLUS THE T BPE DIRECTION (FORWARD OR REVERSE). 
3941 *ALL NUMBERS ARE IN OCTAL. 
| oou5 cadens eabnbuassenneessonseceueusneceunnensuecseseesus 
| 3644 017506 012704 022476 PAPRT: MOV #MSG11.R4 
3845 017512 004737 O20S30 JSR Pc, Trout :PRINT UNIT HEADER 
| 3846 017516 013703 OO00616 MOV up DES, R 
| 3847 017522 000303 SWAB 
3848 017524 042703 0 BIC fi77770, R3 
3849 017530 004737 Oe ISR PC, OCTP ;PRINT UNIT NUMBER 
2850 017534 012704 O25560 MOV #MSG90, R4 : 
2851 017540 004737 020530 ISR PC, TTOUT ;PRINT DENSITY TAG 
3852 017544 005003 CLR 
3853 017546 032737 O20000 opcbit BIT #20000, UDES ;SEE IF BIT 1 OF DENSITY=1 
| 3854 017554 001404 BEQ 1$ *T BR 
3855 017556 00520 INC R3 ELSE SET BIT 1 
3856 017560 032737 O40000 O0DS1E 1S: BIT #40000, UDES ; SEE IF BIT 2 OF DENSITY=! 
3857 b1756 Lage BEQ 2S NOT: BR 
3858 01757 703 oo000e2 BIS #2,R3 FELSE SET BIT 2 
2859 017574 004737 020716 23: ISR PC; OCTP *PRINT DENSITY SETTING 





ene ee ee 


a ee ee 























OZTMAD.P11 ACTL1 HOOKS 
3860 O17600 012704 o2SS65 NUV #MSG91,R4 
009737 020530 PC, TTOUT SPRINT PARITY TAG 
3953 O17 1 036737 004000 000616 BIT 84000, UDES :SEE IF EVEN PARITY 
1401 2$ sIF NOT: BR 
01722 005203 INC R3 ‘ELSE SET TO A ONE 





Tae: MULTIDRIVE DATA RELIABILITY EXERCISER MACYL1 27(732) O4-NOV-76 11:29 PAGE 91 
38 1 4737 020716 38: ISR PC, OCTP -PRINT PARITY 
3oe5 pizPes 12704 pe0ci8 MOV #5686, R4 F 
3868 017634 (004737 020530 JSR PC, TTOUT sPRINT PATTRN TAG 
3869 01764 032777 O90400 161004 BIT #400, aSWR :SEE IF RANDOM DATA 
3870 017646 OO1406 BEQ Paprts :IF NOT: BR 
3871 0617850 012737 009122 O00702 PAPRTA: MOV 4,122, TOB 
3872 017656 004737 020670 JSR PC. TOG sPRINT R 
3873 017662 o00412 BR PAPRTD 
3874 017664 737 O21624 PAPRTB: TST ASE QF ;SEE IF AUTO SEO 
3875 017670 001403 BEQ SAPRTC IF NOT: 
3876 017672 005737 oo0624 TST PATRN :SEE IF AUTO RANDOM 
3877 017676 100764 BMI “APRTA ‘IF SO: BR 
017700 013703 900624 PAPRTC: MOV PATRN.R3 
3879 017704 004737 O20716 JSR PC, octP ;PRINT PATTRN NUMBER 
3880 017710 012704 022513 PAPRTD: MOV #"SG13,R4 
3881 017714 004737 020530 JSR PC TTOUT sPRINT BLOCK NO. HEADER 
3882 017720 013703 000720 MOV BLENTR, R3 
3883 017724 004737 Oe0716 JSR PC. OCTP :PRINT NUMBER 
| 3884 917730 012704 Oeesel MOV #M5G14, R4 
«BB Olea ObN7 a7 JSR » 1100 ;PRINT REC NO. HEADER 
| 3888 O17740 010003 MOV 07 R3 
| 3887 017742 032777 OCO0004 160632 BIT #4’ aMTC :SEE IF WRITE OPERATION 
3888 917750 o0ic0o BNE PAPRTI ;IF SO: BR 
| 3889 017752 013703 oD0620 PAPRT1: MOV RCNT,R3 
| 3830 017756 160003 SUB «RO, RS ;GET RECORD NUMBER 
| 3891 017760 005203 INC R 
| 3892 017762 004737 020716 PAPRT2: JSR PC, OCTP sPRINT RECORD NUMBER 
_ 3893 017766 012737 900055 000702 MOV #55, TOB *LOAD DASH (-) 
| 3894 017774 004737 020670 JSR PC, foG :PRINT DASH (-) 
| 3895 020000 013703 0006 MOV = RCNT.R3 
3896 920004 04737 020716 JSR é ;PRINT RECORD COUNT 
| 3897 O20010 012704 O22464 MOV #MSG7,R4 
| 3898 020014 004737 O20S30 JSR PC. TTOUT ;PRINT RECORD SIZE HEADER 
' 3899 020020 013703 o0062e2 MOV CARCNT, R3 *GET CHARACTER COUNT 
| 3900 029024 905303 DEC R3 
| 3801 20026 095103 COM R3 sREMOVE TWOS COMPLEMENT 
|” 3992 020030 004737 o20716 ISR PC,OCTP -  IPRINT RECORD SIZE 
| 3903 029034 012737 000001 000726 MOV #1) HDRFL *SET HEADER FLAG 
_ 3904 Oe0042 004737 022120 JSR PC; CKSWR _ sTEST FOR tG 
| 2205 020046 000207 RTS PC - SRETURN 


T™,A,B-11 TS03 OR Tul 
OZtMAD.Pi1 


020050 
33! 
920070 
020076 
01 

| 

| 

| 

| 

| 

| 

| 


ACTiI 


000137 


004640 
100200 
000002 
177777 
025712 


004072 


000676 


DRPDRV: 
160522 


001012 


004717 
1$: 


001012 es: 


001012 


000672 RANG: 
000676 
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;DROP UNIT SUBROUTINEs##eeeeeee 


NOP 
M 


#10000, INTC ;POWER CLEAR CONTROLLER 
#MSG3e,R4 


TOUT ;PRINT UNIT DROPPED 
UDES, Ra GET UNIT DESCRIPTION 
8177770, R3 ;MASK UNIT NUMBER 

ocTP’ :PRINT DROPPED UNIT NUMBER 
ares, RY 

TOUT ;PRINT REST OF MSG 


:SET UNIT POINTER 
DN ceo) :SET DROPPED FLAG 
REOT : DECREMENT EOT UNIT COUTER 
PC. PRSTAT :PRINT CURRENT 
U *BUMP DROPPED UNIT COUNTER 
DUCTR, REOTC+1 jSEE IF DROPPED ALL UNITS 


#MSG96, RY 
PC. TTOUT sPRINT ALL DROPPED: STOP 
REOTS :GO TO END ROUTINE 


RO 
#100200,UN1(RO) ; 7 SEE IF any DRIVES LEFT IN THIS PASS 


#2, RO ? BUMP POINTER 
#-1,UN1(RO) :SEE IF LAST ENTRY 

:IF NOT: BR 
#MSGS4, R4 
PC. TTOUT sPRINT NO MORE UNITS 
REbTR. :GO TO END OF PASS ROUTINE 
START? :GO TO NEXT UNIT 


5 ERERR EHH H LEEK EERE SHEE EERE EEE E LE LEAKE EEE EERE ER AREER 
; RANDOM NUMBER GENSRATOR SUBROUTINE: 


THIS SUBROUTINE IS USED TO GENERATE Hs | RANDOM 
; NUMBERS i FOR USE aa M DATA, 


RECORD COUN 


AND CHARACTE 


Sesaupesesnnbesarencesncessesvassseuneeeeuuseeese REE 


RANSAV, RANBAS 

RANBRS, RANSAV  ;GET NEW NUMBER 

RANSAV, "RI ine IF Mw NUMBER TOO BIG 

Re, RANSAV ‘SEE IF RUMBER TOO SMALL 
RANG ‘TF SO: BR 

Bc sEXIT 


Re Oe: 
Eas ik 
et 


C00 “Wun 


my 


cicadas 
a 


USE SESE R RH 


‘ 


BoRBE 
i 


aN 
ite GaN 


g 
8 


ay 
a 


‘5 
i 


eo 
= 


BOSRaGRR 
a8 
aa 


r a ee em ne cee 


wv TI7ORT\ 
_—— oe. zvE - 


000704 


000704 


000704 


000784 


Cate RELTABIL 


—— ewe ee 


ITY EXERCISER 


MACYIL 27(732) 


FPRASRESSFSSESSALESELSESELFSFSAEFSSFLEFSSSLSSE LESS FS SAES 


sTTY ENTRY SUBROUTINE: 


THIS. Sette to TS USED BY THE TEST CONDITION 
SENT TINE TO READ 


ef 

= 

3f 
2 


eee etree ee ae eeae 


:C 


TYR: 
TTRO: 


TYR1: 


TTRIA: 


TTRIB: 


TTRe: 


TTR3: C 


TTR4: 
TTRS: 


IMIT 
(0-7) AND 
ALLING ROUTINE. 

NTRY IS ILLEGAL OR OUTSIDE THE L 
:A QUESTION MARK IS TYPED (7) AND THE REE’ 20NSE 


;MAY BE REEN 
5 a ae MAY NOT EXCEED SIX (&) CHARACTERS , 


C 
;1F ANE 


. _ALL_ RESPONSE 
ALL GI THIN 


AL 
SET BY 
reaTS 


HE LIMIT 


ferspereD AT LESS THAN SIX BY TYPING A 
 EELEPERELEEESFES EPS LASERESSSSLESESESESESESES EEE SEES 


;CLEAR FIRST CHARACTER FLAG 


;G0 ax pret tc 
:SEE IF CR 


;1F NOT: BR 

:SEE_IF FIRST CHARACTER 

s1F $0: BR 

sELSE GO LOAD VALUE 

:SEE IF CHAR IS LESS THAN O 
ise Ge TO 


31 
;ELSE GO TO ERROR 
, ‘e IS GREATER THAN 7 
GO TO ERR 


FIRST CHARACTER FLAG 


;SHIFT 3 LEFT 


sSTRIP ASCII 
sLOAD CHARACTE: 
‘IF NOT: BR 
sSEE IF EXCEEDED MAXIMUM LIMIT 
ELSE GO TO ERROR 
:SEE IF BELOW MINIMUM LIMIT 
IF NOT: BR 

“ELSE GO TO ERROR 

*LOAD VALUE 
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00 SIMU WotR 
fu 
i 


Bi Riiipaiis 
Saree 


Ps Boge oer ome rae oa ae ol 
8 30 

o-- 
on 


FN 


mo 
s 


8 
é 


aistits 
cn 


2 
Soe 


a 


arr —_ 


- MULTIORIVE DATA RELIABILITY EXERCISER 


000704 


160136 


000702 


009702 


157766 
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;TTY ENTRY ERROR SUSROUTINESseaseeeee 


TINER: MOV #MSG43, RY 
ISR PC TTOUT : PRINT? 
Sug 20, (SP) *RESET SP TO START OF VALUE ROUTINE 
RTS PC “REDO VALUE ENTRY 


TTY REPD SUBROUTINE sseeeaeeee 


TTIN: CLR aTKS 
ECR aTKB 
Err TIB 
INC atKs 
TTINI: STB ark 
: PL TIN 
MOV aTK3, TIB 
TTIN2: TSTB @TFS 
EPL TTINe 
MOVE TIB,aTPe 
RTS pC 
sTTY OUTPUT SUBROUTINE ##eeeeexeeee 
TTOUT: MOVB (R4)+,T0B 
cMPB 2Otsést4#3, TB 
BEG TEX 
CMPB 30=soa8#'4#5, TO 
BEG TCRLF 
CMPB0Oss#41, TOB 
BEG TBELL 
ISR PC. TOG 
=k TTbuT 
TCRLF: MOVB #15. TOP 
JSR PC, toc 
MOV #4°R3 
TCRLFA: CLR 08 
13k PC, TOG 
BNE TCRLFA :00 FILLERS 
MOVB  &i2.TOB 
JSR PC. t0G 
TSTB 
BMI 1$ 
BR TTOUT 
1$: CLR ROSW 
oP TEX 
TBELL: MOVB #87,TOB 
JSR Po’ T0G 
BR TTOUT 
TOG:  TSTB aTPS 
BPL TOG 
MOVB  TOB, TPE 
TEX: RTS PC 


[tr rn eee 


TN,8,B-11 TSO3 OR TUIC,N W MULTIORIVE DATA RELIABILITY EXERCISER MACYL1 27(732) O4-NOV-76 11:29 PAGE 95 


Pll ACTIL GobKs 
- sUCTAL OUTPUT SUBROUTINEs#sseeesseee 
4 020706 012737 000001 O21142 OCTPE: MoV $1, 0FL 
4059 peels ooo402 R OCtPE! 
4070 1g 005037 021142 OCTP: CLR OFL sCLEAR FLAG FOR LEADING ZER0 
does Ste Sree Fe Bee IF NOT ZERO: BR 
t $ i $ 
a he 
uocs pee Sth 21122 SR PC, OC TPG! sELSE PRINT. ZERO 
. . : 
soo Psa l OCTPO: BIT #109000,R4 :SEE IF MSD = 1 
| 4978 020750 001436 sE0 OCTPI LIF NOT: 
doed ree 7 sete ISR Hanan PRINT 1 
| 4081 137 20774 IMP soc tp 
| 4082 020766 O0S004 OCTP1: CLR RY 
4083 020770 004737 021100 JSR PC, OCTPG sPRINT 0 
4984 020774 010304 OCTP2: Rov RS, RA 
apse ata Bperos eae ROR RY 
4087 021002 O06004 ROR RY sPOSITION DIGIT 
4088 O21094 006004 ROR RY 
| 4deg 921906 000304 SWAB SséRY 
| 4090 O21010 004737 021190 JSR PC, OCTPG sPRINT DIGIT 2 
— 4081 021014 010304 MOV R3;R4 
|; 4092 tes 006004 ROR 
' 4083 O31 000304 SWAB SséRY 
| 4094 3eidee 004737 021100 JSR PC, OCTPG sPRINT DIGIT 3 
4095 021026 010304 MOV R3/R4 
_ 4096 021030 006104 ROL 
| 4087 021032 006104 ROL RY 
| 4998 921034 gno354 SWAB SsoéRY 
_ 4099 021036 004737 021100 JSR PC, OCTPG :PRINT DIGIT 4 
/ 100 o21042 010304 MOV R3,R4 
, 4101 fe1o44 ROR RY 
| M102 921046 006004 ROR RY 
' 4103 Q210S0 006004 ROR 
/ 4104 021052 004737 021100 : JSR PC, OCTPG 
4105 21056 01004 MOV , 
4106 O21 737 021100 . - JSR PC’ OCTPG sPRINT DIGIT § 
4107 O21064 012737 000240 "00702 OCTP3: MOV $240, TOB 
4108 Oe ON7 37 020670 ISR PC, TOG sPRINT SPACE 
4109 Oel or TS PC tEXIT 
4110 021100 042704 177770 OCTPG: BIC #177770,R4 
Wiiz Geilde DOSta? O2l142 er OOFLN 
Wii Bettie po1001 oF eco 
4114 921114 RTS 
4115 O2lli6 37 021142 OCTPGO: INC OFL 
4116 Qell2z2 052704 60 OCTPG1: BIS #260, R4 
4117 elie 010437 o007Ge MOV RY, TOB 
4118 OQ21132 004737 JSR PC’ TOG 
4119 021136 010304 MOV R3,R4 
4120 021140 00 RTS PC © 
4121 21142 900000 OFL: O FIRST CHAR FLAG 





' Neen nn o_o aoe nen 





a me eee ee re we ne a ee ee ne en ee eee 0 eee ae 





DZtMAD.Pil acTII 4obKs 
4122 
41E3 
ue 
4136 021144 005037 oc070e2 
4127 621150 012704 cOd010 
41298 621154 110337 
4125 O21160 1 157476 
4130 O21164 100375 
43h O21 16¢ 136730 ooc200 
3335 BStiE BP2977 cone: 
4134 021204 000403 
4135 21206 012777 000060 
4} deiel4 137 900792 
4] 1 
4138 Cel222 001356 
4139 O2l224 
4140 
4141] 
4142 
4143 021226 005777 157360 
4144 O2l232 100775 
445 : 005777 157352 
Sid5 B51532 290553 serauy 
4148 O21e46 100775 
4149 De! 000207 


ne es ee 


000702 
157469 
157450 
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DOUT: 


DOUTI: 


DOUTe: 
DOUT3: 


STDLY: 
1$: 
es: 










s;DATA CHARACTER OUTPUT SUSROUTINEs##eneeeeese 


CLR 70 
MOV #10, R4 :SET NUMBER TO PRINT 
“Ove 3. fOB 
TSTB 3s TPS 
BPL pour! 
BITS  #200,TOB 
BEQ pOUTe 
MOV #061, aTPB 
3R DOoUT3 
MOV #060, OTB 
ROL TO 
DEC 4 
BNE DOUT1 
RTS PC 
sASSURE VALID STATUS DELAY SUBROUTINE *##es#4% 
TST aMTRD 
BMI STDLY sAWAIT TIMER = 0 
TST aMTRD 
BFL 1$ ;AWAIT TIMER =1 
S SMTRD 
BMI es sAWAIT TIMER = 0 
RTS PC EXIT 


Oe ee ee 


- ae ee eee oe ee ee 


TM.A,B8-11 TSO3 OR TUIO,N,W MULTIORIVE DATA RELIABILITY EXERCISER MACYLL 27(732) O4-NOV-76 11:29 PAGE 97 
OStnee Pr ACTI1 HOdKS 

4150 sHUTO SEQUENCE TEST ROUTINE #seseeeuex 

diss 1 2 0 ASEO: MOV #MSG78, R4 

41] pe isee Nec B5ae38 JSR PC. TTOUT :PRINT CONT. REQUEST 
458 Delebe Oe lbe MOV ASEOCF.R3 

4] 1265 7 716 JSR S sPRINT CURRENT VALUE 
4158 Deieze 12705 Oe lbee NOy sASEQCF RS SET ENTRY Dee ss 

4] Bste7s 1 ppeaet MOV . SET SpbER LIMIT 

4159 021306 CLR -SET LOWER LIMIT 

4160 021310 004737 020272 ISR PC, TTR GET INPU 

4162 021314 021630 ASEQO: JSR PC, HRDS sSELECT HARDWARE CONFIGURATION 
Wigs Get3e4 Oodes? GBess0 Roy gfbarg a PRINT DIVIDER 

4165 851359 see peers MOV sMSG80, R4 : 

4] 21334 boa? 37 020530 JSR PC, TTOUT ;PRINT UNITS NUMBER MESSG. 
416 i 01 001012 MOV #UN1,RO :POINT TOP OF DRIVE TABLE 
4168 O21344 005710 ASEQ2: TST (RO) :SEE IF END 

4169 Dei 246 100ve4 BMI AMODI TF SO: BR 

4170 Sel 11037 000706 MOV (RO), TEMP :GET UNIT DESCRIPTION 
4171 021354 113703 000707 MOVE TEMPI+1,R3 “POSITION AND 

4172 021360 O42703 177770 BIC #177770,R3 : MASK UNIT NUMBER 
4173 021364 004737 020716 PC, OCT ?PRINT DRIVE TABLE 

4174 021370 012704 023726 MOV #M5G51,R4 *PRESET FOR 9 TRK MSG 
4175 021374 032710 O20000 BIT 820000; (RO) :SEE IF 7 TRK 

4] 21400 d0100e BNE 1§ ‘IF NOT: BR 

4177 Oel 1 023717 MOV #MSGSO,R4 :SET TO.7 TRK MSG 

4178 521406 004737 020530 1S: JSR PC, TTOUT :PRINT TRK MSG 

4179 elie 966709 coond2 ADD #2,R0 :BUMP POINTER 

4180 O21416 BR ASEQe 7DO ALL 

418) 021420 005037 000720 AMODI: CLR BLCNTR 

4183 021424 004737 004732 AMODIB: JSR PC, RWNDA -GO REWIND ALL DRIVES 
4184 021430 012737 O00006 o21622 MOV #6; ABLCNT ;SET NUMBER OF BLOCKS 
4185 021436 012737 174000 000622 MOV #-4000,CARCNT  :SET RECORD SIZE 

4186 Se1444 biers? 100 o00620 MOV #100, RC *SET RECORD COUNT 

4187 Oel4se O1 MOV #3, PATRN *SELECT PATTERN 3 

4188 O21460 005037 O00646 CLR TMEX *ASSURE NO TM 

4189 elie O04 003264 ISR PC, STAUTO *GO DO THIS PATTERN 

4190 0214 13535 000007 o00624 MOV 7) PATRN :SELECT PATTERN 7 

4191 021476 004737 003264 JSR PC’ STAUTO GO DO THIS PATTERN 

4132 21502 12732 000011 000624 MOV #11 PATRN SELECT PATTERN 11 

4193 02151 003264 JSR PC. STAUTO ?GO DO THIS PATTERN 
4194 021514 012737 177777 O2l6be22 MOV -1 ABLCNT “FORCE TO OF TAPE 
4195 De15ee 012737 177777 O006e4 MOV #-1’ PATRN ;SELECT AUTO RANDOM DATA 
4196 O21 012737 152634 000672 MOV #152634, RANBAS 

4138 ata piczs, Gacsb O00E76 RY Sea RANOAV — ; RESET RaNDON DATA BASE 
4] teed By2784 poeses MOV #45679, R4 . 

4200 21554 004737 020530 Ver JSR PC, TTOUT .  $PRINT DIVIDER 

ue02 Gee pie ISR PC ooh R 

4203 021570 005737 O2lb26 TST ASEQCF ;SEE IF CONTINUOUS AUTO SEQ 
4204 021574 001001 BNE ASEQXX IF SO: BR 

W205 21576 O00000 HALT 





em ee + eee ee 





ee eee neni manana arama areca cian taal reneenee i eee 
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betheB. 61 FHP aSoits ce : ; 


1 AC 
4206 021600 go473? 022120 ASEQXX: JSR PC, CKSWR sTEST FOR 46 
4207 O21604 000776 INC SECT :BUMP PASS COUNT 
4208 1610 as e3 000776 MOV SEQCT,.R3 
4 1814 737 «(20716 JSR Pc. Octp sPRINT PASS COUNT 
4210 Oele20 BR Aséad 
42] 1 ppopss ABLENT: 0 
431 1 900009 ASEGF: 9 
4213 1 090809 ASEGCF: 0 
4216 sSUBROUTINE TO SELECT AUTO SEQ HARDWARExsexxeeeex 
4217 021630 995003 HRDS: CLR R3 CLEAR T POINTER 
4218 O21632 000706 SCR TEMP] *CLEAR UNIT DESCRIPTION HOLDER 
4219 021636 005037 O0071e2 CLR TEMP3 :UNIT COUNT 
4220 O21642 005037 O04716 CLR REOTC ‘CLEAR EOT C 
Wess peice GISte? prnaOD 1S6722 a scoto, aT ‘OLER CLEAR CONTROLLER 
4555 B51 PRs tere enate haecae HRDS1: MOVB Hes :POSITION UNIT NUMBER 
dose rate Bos 1226 wnsinie oer “i eMet iS EME STATUS 
4226 51550 nee aan 156672 BIT o ite Te VAIL 
4227 021706 O0i42l BEQ : IF NOT: AOR 
4228 021710 052737 O60000 000705 BIS med TEMP1 § ;SET DENSITY AND PARITY 
4229 021716 032777 O00020 156654 BIT #20, aNtS :SEE IF 7 TRK 
| 4230 981724 001403 BEQ te :IF 
4231 021726 042737 O20000 000706 BIC #20000, TEMP1  :ELSE SET 10 7 TRK NORMAL DENSITY 
| 4232 081734 013763 000706 001012 18: . MOY § TEMP1,UNI(R3) PUT IN TABLE 
| 4233 021742 062702 000002 ADD #2,R3° 
| Hess 921746 005237 000712 INC TEMPS s INCREMENT COUNT 
| 4236 021752 005237 000710 HRDS2: INC TEMP2 ;SET FOR NEXT UNIT 
| 4237 021756 022737 000010 000710 CMP #10, TEMP2 : DONE? 
| 4238 021764 001335 BNE HRDS1 IF NOT: BR 
| 42939 021766 TST R3 :FOUND A UNIT? 
| 4240 021770 rata BNE HROSX IF SO: BR 
| 4241 021772 012704 025173 MOV #MSG82, RY 
4242 921776 004737 020530 JSR PC, TTOUT ; TYPE NO UNIT AVAILABLE 
8 Be ae ie" i 
youd 137 003106 IMP STAUT *START AUTO SEQ AGAIN 
4e4S 023010 012763 1 001012 HRDSX: MOV #-1, UN1(R3) >MARK END OF TABLE 
4 022016 013737 600718 004716 MOV TEMP3,REOTC :SET NUMBER OF UNITS 
4247? 022024 000337 1 SWAB ss TEMP 
4248 022030 053737 O007l2 OO47I16 BIS TEMP3, REOTC ;SET EOT CNTR 
#e43 022036 000207 RTS PC + RETURN 
4351 
4252 O22040 013746 000006 SUSWR: MOV 386, -(SP) ;SAVE VECTORS 
| ise i +f es oo0004 NOV areas SET UP FOR TIMEOUT 
Ue 2 USL ’ 
/  & 02205 §25957 ete ISEEES CMP #-1; ISWR *REFERENCE HARDWARE SWITCH REGISTER 
| oe aot ae SS 
| peepee 022626 1$: CMP (SP)+. (SP)+ sADJUST STACK 
| 4259 O22072 012737 oo0ese 2S: MOV #SWREG, SUR POINT TO SOF THARE SWITCH REG 
| 4260 O22100 12737 maa 000654 MOV #DISPREG, DISPLAY POINT TO SOFT DISPLAY REG 
4261 O22106 O1 60004 38: MOV (SP)+, 084 ;RESTORE VECTORS 





TA 


rit TSO3 ae Ti 


Oeeleb 


RERRRSRR 


VITSLQW ERS 


a 
ru 


ae Wee 


ae eee 0 oe =. 


1 dts 
o00006 


000176 
156524 
177600 
000007 
026154 
020530 
026160 
020530 
psbise 

0706 
026170 
020530 
001002 
d2e2e6 


o00&Se 
009704 
000704 
000704 


000704 
000704 


000704 
001004 
001000 


000704 
000704 


000704 
001002 


156226 


CKSWR: 


CNTLU: 


7$: 


qou3 


aR 


W_ MULTIDRIVE DATA RELIABILITY EXERCISER 


(SP)+,aa6 
PC 


sSWREG, SWR 
OUT 


aTKB, TIB 
#177600, TIB 


#SCNTG, RY 
PC, TTOUT 
aSMSUR, RY 
TOUT 


1$ 
TEMPST, @SWR 
8$ 


— eee ee ee ee 
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;RETURN 
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s SOFTWARE SWITCH REG PRESENT 
GET OUT 


SAND STRIP OFF 
‘THE GORBAGE 


31S IT a’ <t@ 


;GO0_READ A LINE 
RETURN TO MAIN BODY OF PROGRAM 


;G0 ne . A CHARACTER 
F GARBAGE 


; STRIP 
T a tU? 


F NOT 
‘POP THe ene 


;BRANCH IF NOT 


sECHO IT WITH <LF> 


shia IT FIRST 


CHAR 


ACTER 
HANGE 3 IF NOT FIRST ONE 


;POP THE STACK 
GET OUT 


;START OVER IF NOT LEGAL CHARACTER 


;CHANGE SWITCH REGISTER CONTENTS 


;GET NITTY-GRITTY 
;ONLY WANT & ODIGITS 





— 


11 TSO3 OR TuLO,N 
Pll acti] Gobks 


3 


22 


5 
oa 


Seay Baz 


SRR 


co 


EASSESSO 
Lor 


029105 
03SS97 
020073 
047103 
029105 
042522 
020123 
042523 


OSe44S 
047516 
041052 


047122 
020040 


Re 


Base 
wt 
Ck hi | 


22 
55 


052440 


043 
021440 
043 
021440 
043 
021440 
043 
021440 


ous 


MSG1: 
MSG2: 
MSG3: 
MSGY: 
MSGS: 
MSGE: 
MSG7: 
MSG1O: 
MSG11: 


MSG13: 


MSG14: 
MSGIS: 


MSG16: 
MSG17: 
MSG20: 


MSG2OA: 


A_ MULTIORIVE DATA RELIABILITY EXERCISER 
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;ERROR MESSAGES#eaneeeeeee 


-ASCIT 


-ASCIT 
-ASCIT 
-ASCIT 
ASCII 
-ASCIT 
-ASCIT 
-ASCIT 
-ASCIT 


-ASCIT 


-ASCII 
-ASCIT 


-ASCIT 
-ASCII 
-ASCIT 
-ASCIT 


-ASCIT 


-ASCIT 


/#0E &/ 
(7G; %/ 
778; %/ 
SULN 8/ 
SWE 8/ 
7#RE 8/ 
/#RS 8/ 
/*SE 8/ 
J7A7UNIT NO. 87 


/7%BN 8/ 


7*RN 8/7 
t% BAD RECORD“%~#/ 


/ FREEB/ 

/ RERES/ 

/7E0T NO. 87 

7UNIT WILL REWIND AND 8&%/ 


“RESTARTED ON BLOCK ONE%/ 


/WHEN ALL AVAIL UNITS REACH EOT#/ 





ee 


TM.A,B-11 7503 OR TU1O 
Ootnes Pia acTil 4 


Oee7eS 045 
022732 

022740 041040 
022746 44s 


beeree ONS 


ws eee eae 


N 
0 


aks 


046114 


R228 
Se 


R 


2 BR KER 
3 


044441 
1 


MSG22: 


MSGe3: 


MSS24: 


MSGeS: 


MSG26: 


MSG2?: 


MSG20: 


MSG31: 


MSG31A: 


MSG32: 


ASCII 


-ASCIT 


ASCII 


-ASCIT 


-ASCIT 


-ASCII 
-ASCIT 
-ASCITI 


-ASCIT 


-ASCIT 


-ASCIT 
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/“UTUTLLEGAL BOTY%%8/ 


“70ND 87 


77NO INTERRUPT RETURNED“ 8/ 


7Z492NO CONTROLLER READY !!! STOP:%/ 


/PRESS CONTINUE TO RESUME TESTING%#/ 


/7DROPS: &/ 
/YPICKS: 8/7 
/7STAT &/ 


/Z71M,A,B-11:TSO3 OR TULO,N,W MULTIDRIVE DATA RELIABILTY EXERCISER (DZ™™ 


ZENTER CONDITIONS IN OCTAL%#/ 


“72UNIT NUMBER = 8/ 












TA, Bi S03 a8 TUIS,N,W MULTIDRIVE DATA RELIABILITY EXERCISER NACYLI 27(732) 
oZtMAD. ACTII HOOKS 


4430 Oessee 052516 041115 051105 
a 023330 O36440 021440 


4433 023334 G4¥e04S 047105 O44S23 MSG33: .ASCII /“DENSITY = 8/ 
4434 Oesc4e O54524 O36440 021440 


4436 023250 9S004S 051:01 OS211i MSG34: .ASCII /“PARITY = 
023356 020075 04 


O4-NOV-76 11:29 PAGE 102 





4438 
4439 023363 O45 rash 047503 MSG3S: .ASCII /“RECORD COUNT = #/ 


O4144S 040510 O40S22 MSG3E: .ASCII /XCHARACTER COUNT = #/ 
4448 023430 OS004S pee 10k O42S24 MSG37: .ASCII /“PATTERN NUMBER = &/ 


023453 OWS C44S23 043516 MSG38: .ASCII /ZSINGLE PASS = #/ 


4455 Oe3466 020075 043 
4456 023473 O41 O4e44S O42116 MSG39: .ASCII /!%END OF PASS !!4/ 
3500 O04 0520 


pssess OYS O4e44S OS2116 MSGHO: .ASCII /%ZENTER STALLS“READ = #/ 


4465 023544 44S O44S22 O4eS24 MSG41: .ASCII /“WRITE = #7 
P MSG42: .ASCII /XTURN AROUND = 8/7 


023576 C3744S 2144S MSG43: .ASCII /%?%8/ 
O4244S 052116 O5110S MSG44: .ASCII /ZENTER YO2ZZLE STALL 


a/ 


4479 023631 O4S 051105 O20le2 MSGYS: .ASCII /XERR AMT &/ 
4460 023636 O46501 O201e4 043 


auB3 023643 OWS 041527 Oel44O MSG4E: .ASCII /x“WC #7 
4484 O23650 O4144S 020101 O43 MSGH7: .ASCII /XCA #7 


cease ee cane --- eee 











103 





TM,A,8-11 TSO3 OR TUIO,N.W_ MULTIDRIVE DATA RELIABILITY EXERCISER MACYLL 27732) O4-NOV-76 11:29 PAG 
Fy ACTiI HOOKS : : 
| 


44 0 36S5 OYS Ce044) O47041 MSGHB: .HSCII /%!!!NO BOT ON REWIND: #/ 
4487 Qce366e O80l17 O47502e 020124 
4488 023670 047117 051040 053505 
023676 O47111 035104 043 


4491 023703 O4C O4751& O201e4 MSG49: .ASCII / NOT AVAIL #/ 
4492 023710 m+ O44S01 020114 


4434 Oe3717 OSS OS2067 O4SS22 MSGSO: .ASCII /-7TRK &/ 
4496 Oe372e6 vactt O5i1e4% O201i3 MSGS1: .ASCII /-9TRK #/ 
4498 023735 OWS O47516 pap LAG MSGS2: .ASCII /%NON:RETRYABLE #/ 


04 
dens Oe OeS0Se O474Se MSGS3: .ASCII /%#**ORIGINAL ERROR##*8/ 
025052 
OWS O4eSee O47503 MSGS4: .ASCII /“RECOVERED#/ 


4507 Oe4016 051045 = OS4See MSGSS: .ASCII /%RETRY: #/ 
Oe40e7 OWS OSeSe3 050123 MSGS&: .ASCII /“SUSPECT BAD TAPEs/ 


03 
| 303 O24034 O41505 020124 o40502 
| 4511 Oe4042 020104 
| 4512 Qey0so ~— O43 
| 4513 O24051 — O45 Q4eS22 O42520 MSGS7: .ASCII /“REPEAT: #/ 
| 4514 924056 052101 O20072 043 | 
| 4515 024063 — O45 e044] OS244] MSGSB: .ASCII /%!!!UNRUCOVERABLE BAD SPOT#/ 
| 4516 024070 051116 O41S0S 053117 
| 4517 024076 051105 o41101 o42514 
| 4518 O24104 041040 o42101 oOS1440 
B13 Oeal12 047520 OeIse4 
| 4521 O24116 O2044S O20441 OYOS02 MSGS9: .ASCII /%!!!BAD TAPE OVERFLOW/ 
4522 24124 020104 040524 o42520 
4523 Oodle 047440 42526 O43ie 
4524 Oe4140 047514 127 
| 4525 024143 — 04S o4NSe4 o4ese0 ,ASCIY /“TAPE WILL BE REWOUND AND REMOVED FROM/ 
«4526 OCe41S0 O53440 O46111 O20114 
He? Oe4156 OyesGe OS1040 053505 
4528 Oe4164 052517 042116 O40440 
45209 Oe4172 O42116 O51040 O46505 
4530 Oe4200 053117 42105 043040 
4531 Oe4e06 047522 115 
ue De¥ell o425e4 952123 JASCII /“TESTING UNTIL ALL ARE RESTARTED AT BLOCK ONE. #/ 
453 16 O47111 O20107 047125 
4534 Oe4ee4 O44524 020114 O46101 
4535 Oe¥e32 020114 051101 020105 
4536 O4eS22 052123 051101 
4537 Oeve4e O4e5e4 00104 052101 
45 O41040 047514 o45503 
453 047440 O42516 O2145 


9 Oetebe 6 
4540 Oe4%e70 OS204S 050101 020105 MSGEO: .ASCII /XTAPE MARK = #/ 
4541 Oeve76 O4051S O4SS22 036440 


+ 





SotneS Pit ¥ 


ee 





TSO3 O8 TULO,N,W MULTIORIVE DATA RELIABILITY EXERCISER MACYL1 27(732) O4-NOV-76 11:29 
024304 021440 
024306 O20445 020441 OHOSO2 MSGbI: .ASCII /%!!!BACKSPACE ERROR’ 
024314 O45S502 050123 041501 
024322 020105 051105 047522 
BSuss1 OS O4OSeY o¥ese0 ASCII /XTAPE WILL BE REWOUND AND REMOVED FROM / 

. ya 

024336 OS3440 O46111 020114 
024344 04 051040 05350 
Bouse Ossei> OaetIe ONaa4O 
024360 042116 051040 O4EsOS 
024366 OS3117 O42105 943040 
024374 047522 020115 
24400 O52045 051505 o44sey ASCII /%TESTING UNTIL ALL ARE RESTARTED AT BLOCK ONE. #/ 
O24405 043516 O52440 OSz1i6 
Oo44i4 O46i11 O4O44O 046114 
Oe4422 O40440 O4eSe2 051040 
024430 051 0524 052122 
024436 042105 O40440 O20ic4 
Oe4444 046102 041517 020113 
Oe44S2 047117 027105 — O4 
024457 42527 OS2040 MSGE2: .ASCII /*WE TMe/ 
024464 021515 
Deve O51452 20105 O¥ES24 MSGE3: ASCII /*SE THe 

75 __O45 052127 OS110S MSG64: .ASCII /“NTERR: #/ 
Oe4S02 035122 O21440 
24506 051045 O42S04 O0S1122 MSGES: .ASCII /“RDERR: #/ 
N4514 O20072 043 
024517 O45 OS2104 OS110S MSGS: .ASCII /“DTERR: #/ 
024504 o035!22 O21440 
024530 0212445 MSG&7: .ASCII 7x#/ 
024532 041040 G42101 OS2040 MSGB8: [ASCII 7 BAD TAPE SPOTS%#/ 
024540 JS0101 020105 O50123 
024546 052117 O2e523 O43 
024552 O52 O42S23 OSIOYD MSG9: .ASCII /xSE RTYa/ 

EQ OS4S24 — O43 
O2e4Fo3 O52 O42S22 OS2040 MSG70: .ASCIIT /#RE TMa/ 
024570 o21515 
024572 OS1045 O40SOS O20104 MSG71: .ASCII /“READ FAILED--RETRY: #/ 
“4600 040506 O46111 042105 

606 O26455 O42S22 OSIl2 
Ge4614 035131 O21440 
Oe4620 O044S C2044] O4OSIO MSG72: .ASCII /%!!!HARD READ ERROR#/ 
024526 O4el22 OS1940 o40S0S 
024634 020104 051105 047522 
Deveie Geisee 
24644 5104S 051105 OY4OSOS MSG73: .ASCII /“REREAD SUCCESSFUL--RETRY: #/ 
24652 020104 052523 041503 
O24660 051505 043123 046125 
24666 2645S O42Se2 051104 
024674 035131 O21440 
024700 2004S 047523 052106 MSG74: .ASCII /% SOFT: #/ 

4706 20072 — O43 
024711 — O45 O44O4D OS1101 MSG75: .ASCII /% HARD: #/ 
024716 035104 O21440 
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' 


+ 


a re re re eee er eee 


T™,A,8-11 TSO3 OR TUIO,N 
ZTMHO.P11 


0 


< 


i 


FELERRERE 
SEESE LETTE E DOLE E TOES, 


FSET TTESLS 


4621 


BAER 


HORROR 


RESP SAMLRE 


020045 
02007e 
45 


0S2122 
043 


os4S2e 
026115 


046101 


020117 
0e007e 


025052 
025052 
O2S0Se 


025052 


MSG76: 
MSG77: 


MSG78: 


MSG79: 


MSG8O: 


MSG81: 


MSGEBe: 


MSG83: 
MSG84: 


MSG8S: 


MSG8E: 
MSG87: 


W MULTIDRIVE DATA RELIABILITY EXERCISER 
acTiL Hooks 


-HSCII 
-ASCII 


-ASCIT 


-ASCII 
-ASCIT 


-ASCIT 


-ASCIT 
-ASCIT 
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7% RTRY: &/ 
/%ATM,A,B-11 AUTO SEQUENCE TEST (DZTMH-Di%/ 


ZENTER RESPONSES IN CCTAL“#/ 
/7ASTO CONT: #7 

VTL RSE ESSA EEE ISIS 
PERRIER 

/UNITS TO BE TESTED“#/ 

“END OF SEQUENCE NO. &/ 


7A22NO DRIVES AVAILABLE FOR AUTO SEQ--HALT%#/ 


Z7LPC &/ 


/“REGISTER START = a&/ 


SUNECTOR ADDRESS = &/ 


/*#PATTRN @/ 
/7PREMATURE EOT IN AUTO SEQ- 











W. MULTIORIVE ORTS RELIASILITY EXERCISER MACY!) 27(732) O4-NOV-76 11:29 
LN 


| 
| wees Gsese4 OS : 
| we5e Oe5s 101 92010 ASCII “TAPE WILL BE REWOUND AND BUTO SEQUENCE” 
| ager O63 M114 O9104 
| se Bseup2 620155 Gas6s2 Q47Se? 
| $555 CE5410 ON71e5 O20109 947151 
| 16 520108 652601 O47e24 
| B61 GSS44 OS1440 Qusess 
| ages OBeu52 O4iS1 I : 
wees O54 S35 Bie? O¥eI4 LASCIT /IILL CONINUE ON THIS UNITa/ 
| ages OBEWNS QMNND ON71I7 O4F111 
| Se55 DESH DMeses Du7WHO S20116 
Meee Oes4s— Oudied OS1S11 Ose440 
 BSeuso Beads GESiSe OSHSES MSGSE: LASCIT / RETRYE’ 
"4 iw - s 
38 aBeaob 043 
E71 25477 OMS. OBOMHL «OSS441 MSGES: .ASCII /“PT!UNIT IS REWINDING: TEST WILL START WHEN DONES/ 
| 4872 O85504 Ow516 D201e4 051511 
| 673 Ses 1049 Os3s0 O47i11 
| 475 Besies besae 
| 4E7— GS6594 OME111 O201149 2123 
«58 Boece Baoins Baeasd Suriie 
deog Seeeee Bei ene 
| $880 GESSED DsetS? ou7i0s carwup Hse ASCII /*DEN #7 
4651 OSS5e6 051101 OS1440 NEGS1: “ASCII 7aPAR 8” 
Ee SeS574 CeO] Oeewl Coos MSGde: CASCIT /#11/DROPPED UNIT: ¥/ 
eas O25502 120 O43105 
wee eSb10 44516 0351 
GEBS 16 O21 
4596 055620 O4O44S 052124 O4ESOS MSG93: .ASCIZ /“ATTEMPT TO RESTART UNIT WILL BE” 
#687 Qesbes Osele) Se0%9 e011? 
Se eee bee fe Bil 
wees Sees pegles Oise Besitd 
£91 OS565— 42502 
4ES2 OSSe60 OMEG4S 042101 020105 LASCII /“MADE AT END OF PASSE! !xx8/ 
4695 O25666 OS2101 O¥S440 ONe116 
4ES4 OSS674 ON7440 20106 O40Se0 
see estos Osise) Cel deed) 
eas . 
4E9? 05671 1 QeoW41 QH7ONS MOSH: ASCII /11!%xNO MORE UNITS TO TEST IN THIS PRSS/ 
wE98 025720 O2011 1S g42S22 ; 
4599 O55725 52440 OH4EI6 OS1e54 : 
ve ee fers Ge Bae 
irc Sesreb Gis Obisil Os00N0 
4704 026761 O45 O4G101 020114 LASCII /“ALL ARE DROPPED OR REWUOND. xx8/ 
«$705 Des7ee 051101 e005 051104 
47 117 Suese0 020104 
47, 4337 1 3505 
u7De O20 42116 022456 


708 i 
4703 Oce0lé 


fg 
5 


ee 


Aeneas Rite eee eRe aae omene emtalia  ce nee i ORF a RN A i OIE er Dieta in ee Sie ae aie te 





‘ 





ree ee 
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| OZtMAD.P12 ACTLL HOOKS 
4710 O26080 OBO) OReY¥E OY7EIY MSGSS: SCI /t4#”LOST SELECT REMOTES 
| all 052123 O51440 O46105 
415 Deeoue OMPEIE QaseoN | ong 
| wera Beas 1 rena QUOMME MSCS: ASCIT 1!!UALL ARE DROPPED: END OF PASS STOPIITS: 
| 4715 G26os4 o46114 O4es22 
| 4716 047522 050120 
471? 10s geod7e 047105 
| 4?tg 104 043117 050040 
| 4719 O38104 051501 020122 
| $280 Qe6l1e OS0117 OeoNN] Oela : 
4721 O21 O441 04 7101 MSGS7: .ASCII /!!%CANNOT TEST LOAD MEDIUM%8/ 
| 47z2 Oeics ON7S16 O20124 Ou 
| 4783 26134 052123 46040 040517 
| 4734 O36142 020104 O42515 
4725 026150 021445 
472 026154 021507 SCNTG: .ASCII /xtGe/ 
4727 026160 3 036522 SMSWR: [ASCII /“uSuR= 9 
| 4728 O26166 921440 
| 4729 026170 20040 O42516 O36527 SMNEW: .ASCII / NEW= 8/ 
| 4730 086176 021440 : | 
| 4731 EVEN 
| Sg3g Oee200 oo0000 woata: 0 ;WRITE BUFFER 
47 032212 .=. +4010 
4735 o32212 000000 RDATA: @ ;READ BUFFER 
4737 oo000! END 





r 
| ™,A,8 





8-11 TSOS O 
OztMHD.P11 
~ ONT = 
aryike Sistas 
ast 021420 
i8 psi ies 
ASEQ 1252 
| ASEGCF Oelb26 
a4 bs iBen 
ak Bie 
ASEOO 1314 
ASEG2 021344 
BSC 0007ee2 
BCNT 736 
BOPP ? 
BORTY] 001214 
BORTYe OOlelé 
BORTYS O0l220 
; BORTYY ppiese 
Bay Bie 
BORTY7 001230 
BORTYS ete 
st 0014 
| BO2O 001514 
8030 001534 
| BOY 001554 
| BOSS 001574 
| BD60 501614 
' 8070 002634 
ex SP 010132 
| BKO pibive 
| BKI iDe4s 
| BKIA O10336 
, BKIB 010402 
, BKIC 010264 
| Bke Theve 
' BK2 10412 
'BLONTR 000720 
 BPKP 090770 
, BPOO 001254 
BP10 001274 
BP20 001314 
/ BPSD 001334 
BPD 001354 
| BPSD 001374 
. BPED 001414 
| BP70 001434 
_BTAOOR 002714 
'BTCLR 016016 
'BICLR] 016026 
'BTFLG  O00746 
_ BTOV 006570 
| BTOVX 016014 
'BTOVO 915670 
.870¥V1 015700 





ee ee 


CROSS REF 


meee 
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4184s 
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4194 


421.8 
séfe*# 3603 3662 


1697 1815 1871 e637 4 =6eb78 0S 2859 87H HE 128 


3154# 3208% 3e82*e 3283 3289# 3290% 3291# 3232 32344# 3310s 
3388 32918 3396% 3417# 34208 34e4% 3429% 

aac" 3371 3399 3404* 34138 341S5*# 3418 34224 

24998 

e506 

1696* 1699 1702 18678 1955 2156 3882 41S1% 

3378% 3379 3398 3403* S4l4# 34l6* 3427 34314 

3490 

1805 1808* 1810 1813* 2180 ele4# e2192% 2223 2471 2499% 


a ee ee eee 





es3s4s 





a 


Ragu 


STOV 
TPR 
TPT 

gtsir 
TUR 

BTOO 





~4-4—4 
aR 


|e 
STO4 
| 

| 


| CHAIN 


ae ae 


SSS 


ohne 
Moos 


eenee 


Reese 
pictciets 


002734 


eee 


1 
15978 
15898 


2881 





OR TUIO.N.W MULTIDRIVE DATA RELIABILITY EXERCISER 
CROSS REFERENCE TABLE -- USER SYMBOLS 


e151 
1759+ 
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3490# 3491 3497 3 


wn 
oO 
Oo 
tf 
an 
-- 
wo 
qo 
an 
ic 
fm 


e1s3* 2is4 2161 
3524 


esse 2398 © 2579% 2770# 2771 3042 3064 


e7be# 2763 2765 
3S61 3899 41 8S# 





3904 





3480 3Sé2 3676 3811 4206 42658 


4311% 


ae eee 
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DZtMHO.P11 CROSS REFERENCE TABLE -- USER SYMBOLS 
DATER! 001134 14688 32228 3477 
Dar’ 051136 146Se 
DA 00114 14708 
DATERSY 001142 14718 
DATERS OO1144 14728 
DATERS O01146 14738 
ie BSS 
ore ieee 1714 2863 30428 
DA 013254 30468 3049 
DATO 8 ©-«soesSe2 1590 28978 
DATOA 012602 29038 2918 2922 2925 
DATOB O12620 29068 2909 2911 
DATDC 012704 2916 29238 
Dar: Sle7le 29268 2934 
DAT. Oie7ee 29288 2933 
i DATOF Ole736 2930 29328 
|DaTl 12754 1591 29428 
}DATIA Ole7é0 23438 292 2975 2980 2985 2990 3016 302! 
DATIB 012764 eo44e ©2946 
DATIO 013074 1598 29898 
DATi1 013104 1599 2995s 
DATIIA 013112 29978 3000 
Ti2 013126 1600 3005s 
| DATI2A 013136 30078 3010 
DATI3 «013152 1801 3015s 
| OATI4 013162 1602 30208 
DATIS 013172 1603 30258 
| DATISA 913202 30278 3036 
'DATISB 013206 30288 3033 
/DATISC 013220 3030 303c8 
| DATISR 013176 30268 3037 
‘Dat2 012776 1592 29518 
‘DATS. 013004 1593 29Sb8 
/DATSA 013012 29588 2969 
| DAT3B 013016 29598 «2562 
DATS «=: 13032 1594 = 29678 
‘DATS =: O1 3044 1595 29748 
‘DaTE 013054 159 29798 
| DA 913064 1597 29848 
DCHK 013712 2296 e415 © 31628 
' DEREX O146'G 3284 3306 3309 3316 33188 
| DEREX1 O14644 3319 3324 * 
| DERFL 13928 3163% 3158 212% 3217 
DERR O14242 3197 3211 3265s 
| DERRO O14e56 3256 32588 3325 
| DERROA 014316 3260 b2 32678 
| DERROB 014336 32728 
'DERRI 014370 32798 
DERR2 O01 32808 
'DERR3 014376 32818 
01 3557 32828 
DERRYA g1usH 33078 
DERRYB Ci+SSE 3293 33108 
DERFS 014576 33158 
DERRE 4604 2% 3313 33178 


(coo 


a 





nm mn oe 





ee ee eee 
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costes bt, CROSS REPERENCE TABLE -- USER SYMBOLS - 





ofA sé 4004 3175 3177e «3181 
pee O1NDLe 31908 3185 
¢ © 014020 3178 «31838 
a 14934 3182 3868 
14234 3218 3220 3224" 
OFO 14044 3169 3171 31898 
bea 14204 320i «32178 
014120 3191 32028 2216 
DF71 14152 3207 32108 
OF7S 43 s014170 3009 «9-32 138 
OFS =O 4Obe 3189 31928 3200 
Deez 14074 3193 31958 
$ oi4il2 3195 31998 
DISPLA cy 13608 42608 
DISPRE 000174 13098 4260 } 
pouT «21144 bug9 BMS] ss327h.)=Sfs«iC328D)=Ss 363950 ss3637—s“41 DG 
DOUT! 21160 41298 «4130 4«= «4138 
poute 2120 4132s 3S 
DOUT 1214 4134 41368 
Dee 4 33t28 
OPCs 4754 3363 33658 
DPCO «= sg47b2 33668 
DPCOA = -O1S024 3374 33768 | 
Dect 915032 3369 3788 
Bees” = pteve8 3355 $393" 32093398 
DPCeA 015064 3377 «433868 
DPCeB 015106 3389s 3392 
OPCS -915154 3397-34018 - 
DPPRT 015232 3376 3384 34108 3448 
DPPRIX 015366 3430 434338 
DPPRTD 015274 34188 32423 
OPPRT1 015322 34u31 uae 
DPPRT2 15340 34374 3432 
DROP 014736 3357 33608 
DRPDRY 020050 1737 1856 1946 2273 3762 39108 
DRPK 914724 33578 
‘DRPKF 014656 315% 3210 32488 
ORP1 001054 14358 3353. «33860 3404 = 3413 
DRP2 © 901056 14368 
DRP3 © O01060 14378 
'DRPY 001062 14398 
DRPS  O01064 14398 
DRPE ©: 001066 14408 
BRP? 001070 14418 
Beye «| (Bee tue. 2eS74 
pep = tes 2eS9e 
Bes «= BiSuee Ee me 
Bebe OB tBueB Beh 
051 12510 POS8 46 PBBPe «BSB «SO 2912S«s«29BL)«=SsiSH7])Ss«29H9-S «300 «Sss3011 ~=Ss(3031 
ps3 12516 2798 «= PUIG Ss BBY 
64 12526 2ea6e 2888 
CUCTR 001006 14098 1891* 3924% 3925 
COFL «©: 1274 27764 2897 899% 29358 


| 





1 TSO3 

-Pll 
Boies 
iB 

es 
OTCTY Boi Sus 
EOTC 001244 
001246 
OTC 001250 
00125e 
OTREC 00076C 
ERCHK O16936 
EREX 016720 
EREXO O1S664 
ERSAVY 900740 
ERTFL ” 
ERO 016130 
EROA 016110 
ERI 16134 
ERIA le382 
ERIB 16302 
ER1O 016530 
ERe 016360 
| EROA 01s4le 
| ERS O164i6 
| ERSA 018426 
| ERB 016432 
| ER7 Ole46e2 
| EXCRC O13676 
| EXLRC 013700 
| FREX 017004 
| FRPRT 016742 
| FRO 016774 
, GORTY1 001174 
| GORTYe 001176 
'GORTYS 001200 
| GORTY4 O01202 
| GORTYS 001204 
| GORTYE 001206 
| GDRTY7 001210 
| GORTYB OOl2le 
HKORFL 000726 
| HERE 004660 
| HRDS 021630 
| HROSX OQO22010 
| HRDS1 021660 
| HRDS2 021752 
| LRCPT pt 3706 
| LRCOSV 13704 
gS oe 
'MSG10 O2e471 
MSG11 O2eek76 
MSG13 O2ce513 
MSG14  Q22S21 


Qa 
On 
o- 


R 


wc 


Lt] 


mz 


f 


Une 


ebeence 


IORIVE DATA RELIAB 
TASLE == USER SYME 


1981# 
1824# 


ILITY EXERCISER 
OLS 


2067# 2177% 21798  2253% 
i8eS 


2477 


43414 
43448 


oc re ee 


2003* 


2409 
3669 


2087+# 
2169% 


3597 
3614 
3675 


3746 


S1b4# 


3658 
3603 
2e59# 


2037 2047 

35618 

3672 2$74 

ece8 2283% 
3690 36058 
36178 

3782 

3259 3903* 
3666 

2397* 3580 
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2319%  =46&+ 


2265* 2306 


36768 


2284* 24744 


3652 
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e482 4 eS0Se 226 
2323 486 23e6*# 862487 
e475 201%  2S0S+# 


3627 


e459 


608% 





e464 


3611# 





Fit 


TS03 OR TUIO.NW 


MULTIORIVE DATA RELIABILITY EXERCISER 





CROSS REFERENCE TABLE -- USER SYMBOLS 


43798 


44078 
44108 


44728 


e708 =s_« 44918 
e 3741 43298 


ees 3=8=—- 44988 
e340 8=64SO1 8 


3744 43318 


45738 


a ae ne +e - eee 
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T™™,A,8-11 TSO3 OR TUIO,N,W MULTIDRIVE DATA RELIAB 
come YMB 





ll CROSS REFERENCE TABLE -- USER S 
MSG89 024553 2177 4S77% 
MSG? Oe 2464 5697 43338 
m5G70 Oe 2319-45798 
ar 2349 0Ss« Sis 
¢ 2355 45eSe 
G73 Oo4e44 2262 4206-45898 
MSG74 024700 3464 4S 4g 
MSG7S5  Oe4711 3469 45968 
S67 3 4 45988 
; 7 639 «= - 4BOOe 
M5G78 4152 Bl 28 
M5G7@ “025053 4163-4199 46158 
MSG8O 025121 WIES 4238 
MSG81 1 4201 46278 
MS Pn, 46318 
MS 4 3 46398 
mSG84  OeSes5 DES] ss 8 
MSG8S 025300 CbEB Cité 
MSG8 4025323 3867 46498 
MSG87 025234 1819 4ESis 
mSce8 025470 1802 46a 
MSc89 025477 1729 46718 
| #3630 025560 3950 =: 480 
'M5G91 25566 3860 «46818 
,MS5G92 «985574 3912 4é828 
/MSG93 «025620 3918 4686s 
| MSG94 025712 3937-46978 
1 MS5G95  d26020 3760 47108 
/MSG96 «=: 926047 3927 «47148 
'm5G97 “026120 1635 2648 47218 
| MTC odc602 12398 666% 1657 
1982% 1990% 1993 
3571 3574 3585 
| 3887 3911%  4Yeece 
; MTD 000610 13428 3598 
/MTINT 17466 1328 2676 38239 
MTRD 900612 13438 2255* 2320% 
MTS 000605 13388 1724 1726 
1983%  2257% 
31 3587 3608 
| MAC O00604 13408 1586%  2070% 
2521 3647 
NOP = 000240 12828 
OCTP  Oe9716 1826 2131 2140 
2785 2794 2803 
3478 «3494 ~«=-_-3506 
3879-38 3892 
| OCTPE 06 4068". 427 
OCTPE! 020722 4069 —s«44O718 
TPG 021100 4080 46-40 4090 
'OCTPGD O21116 4111 4113s LS 
| OCTPG] Oelle2 075 = 1 168 
| OCTPY by hy 4072 4074 40778 
| OCTPI 0766 4078 4082s 
| OCTP2 020774 4081  4OB4s 


ILI 
OLS 


1795* 1798% 1830 a 
391 3731 3734 3739 


41108 








1915% 
2516% 
3765% 
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BABSH,T 


EES — ee 
PPP TVUD YOO ° 
333 Bor 
—=r- 
4-444 
Own 





an 


BagRaseee 
Rageerien 


R TUIO,N,W MULTIORIVE DATA R 
CROSS REFERENCE TASLE -- USER 


2900% 
2901# 


4073 
42818 


re 
3758 


2914 
2903# 


41le 
4298 
1799 
3779 


31468 
ebege 
e7 


2906 


eee ETY EXERCISER 
YMBOLS 


4115% 


1853 
28448 


41218 
1943 
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ecb Ss P41 eSeS = 3263 


e876 3876 3878 4187% 


3677# 
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2375 


3383 






2447 








qi geanZSBREEES EER RecemaanaS 


11 
Pil 


001120 


Jb bebe 
b+ 6 bb Oc be 


oes ~ 
ZERSRENSE 


sieh esis 


aes 
ee 


004622 


TSO3 OR TUIO.N.W MULT 
CROSS REFERENC 


SReR 

Wo c 

NGO CG) 
Bt St 
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ABLE -- USER SYMBOLS 


2307 


1890# 
4OSS* 


e282 
22984 


2185 
1688 
e741 


18218 
1820 


1858 


18744 














3351 41964 
39508 3953 3955 
sv 06lU COUCH KSAT HCSALL: 78d 
tides 2188 e222 e454 e466 208 2ii es97# e752 2754 


ese9 3167s 3270—is3305 3308 «= 3878 2S: 47358 


e336 38=—_ 3693 

e3l2 = 23ees 

ees7 8 3051% 30538 
4293% 

e290 e928 

216%) 862225 


e327 
1832e% 1838% 1839 1840# 1841% 18938 1907 1908 1909%  1910% 
2747 2748e e749% 3922% 3925 4Y2e0e% Y4b*e  424Sx 





18284 


3939 


£3.88 Ae TS03 oR T 


REOT9 O04640 
RPCNT 000750 
BRTYFL So0e7a 
RRTYX bores 
RRTYO 0742 
RRTY1]  O07426 
RRTY2 007474 
ere Be 
Rerve  Boseee 
RSEQ 006626 
RSEX 006720 
RSFRO  O06676 
R DO&ESS 
RST 000632 
| RTC 000752 
/RTRN oO00724 
RTYFL 000754 
RTYL 001154 
RTYe 001156 
RTY3 001160 
RTY4 OO1162 
RTYS  OO1164 
RTYe OO1166 
RTY7 001170 
'RTYB ©: 001172 
| RUND 904720 
pron opa7ae 
BUND ppasee 
/RWND1  O0S5016 
/RWND2  O05040 
/RWNOS 005050 
RUNDY 005120 
'RWNDS 005150 
'RWNDE 005162 
RO =“O00000 


RI 000001 


Seats 


1 


BT pORTye 0 DA 


3500% 


2095% 
2368% 


4183 


Ta RELI 
USER SY 


elels 
2410 


inet bat EXERCISER 


2122 
3620 


2139 

2391% 
60 

e19le* 


m™ 
© 
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2143 
2145 ele4* 2165 eee e344# 235! 
2e405* 2518% 3789 3827 
elle# el82ct  3486% 
3457 
1658 1661% 1673% 1679% 1681%  1682% 
1706*  1707% 708 1718 1756%  1760# 
B44 lgSe# 1859% 1861% 1862  1864% 
43h3 16 * 9e4# 1925% i 7% 1928 
e 039% O41%  2068% 189 eee 
e4s6# e2459% e460% e2461% 2463 e468% 
e676 2677% 2695 269% cb98%  2699% 
3083 3092% 3093% 3099*% 3446  3502% 
392e0% 3921% 3931% 3932 3934* 935 
4007 4 894167*% 4168 417 4175 = 41 79% 
1999 2000 2001*% 200 2427% 252l% 
2656 2671% 2686% e272e0% e732%  2755% 
e8e3* 2876% 2877 e878 e2880% 2881 
e923 eb92b* )3=— 9282S 29842 S44 2951% 
e9ss 2995 2997  2998%  3005* 300 
3066 3068  3094* 3096 3110% 32 
3c0S# 3206 3275 3281 3302%  3303% 
3515 3517# 3952 3999% 4157% 
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2353 


2364 








WooMY 
Pil CROSS REFERENCE TABLE -- User 
R2 =000002 12768 4 2428* 2577 e594" 257% 2672% 2697% 27214 2733% 2756% 2767" 2779% 2788% 


3e 335 1 
R3 2000003 le77# 1686% 1687% 1688 1825+ 130 2139% 2143% e2154% 215 gl esb4#  2423% 


4084 4091 4095 4 4105 4119 4128 4154 41S9% 4171% 4172% 44208"  4217% 
4Yes2% 4233% 4239 4Yo4Se 4275% 

R4 =%000004 12788 1631% 1635% 1729% 1735% 1741% 742% 1743 1769 1802 1807% 1812%  1819% 
1821% i823% 824% 1825 1se7* 1854* 1874% 1878% 1881 isv4* 2014 2015*  e2022e 


3082 3085* % 3096 3101% 3105 3109% 14 3118% 3121% leek  3131% 
3135 137% 221% 3222% 3264%  3267%  3273%  3277% 3351% 3353 
3361% 3362 3385* 3387% 3390% 3402% 3403 3404 3405* 410%  341e% 3 
S4eS5* S449% 3451% 3452 3454 3456% 3457 S459% 461% 3462 S464% 466% 
3467 = 469% 3=— 471% SY74* 3476% 3477 3487 3489% 3490 3495%  3507% 3508 
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oztm YMBOLS 

| 

| 

i 

j 

| 

! 

| 


| RS =%000005 12798 5a9 * 2655% 2660% 2663% 2664  2670% it e754" 2765% 2777% 2786  2795% 


| eB04e * e82e% 3076% 3077% 3078% 3079% 308 3165* 3180# 3186% 3199%  3215% 
3295 =—s_« 297% «=633lee §83317% 4007  4156% 

SEQC 000776 14058 42e07% 4208 

SERFL 00074e 13918 2012 2016 2078 2119 2175% 2277 2297 e345 3219 3261 3563#  3617% 
| SP =%000006 e808 1630% 1649% 668% 1836 1870 1887# 2183 2193 e3e5 e680 3133% 31ste 
3136 3823 4YOIS# YeSee YeS3% 4eS8 4cbl 4262 4289-4297 
| SPBK 010466 ei78 e470) 8 8=6e5i38 
|SPFLG O00 13508 1876 2795 

STAL 000730 i358 1749% 17See 17668 2007# 2302 23878 2392% 2394# 2513% 2519 2535% 2560+ 
' ST 010634 1750 1789 «62008 «= 2303 2388 )«=—s«239S_siS14% 8 48=—2S36 = SOs 86 Sb 

STAR 1315 lécbs 

STARTA 003124 1319 16488 

STPRTB 003146 164 16538 

STARTC 093174 16608 1662 

STARTD 003236 16688 

STARTE O0314e2 1322 1652s 





1:29 PRE 120 
ACYIL @7(732) CMeNOV-"B 11:89 FRoe 2 
a j LIABILITY EXERCISER MaAcYII é Sé: 
EVeP aoe PRery* Ts Ae iagn TY 
| ERE Ee aed HEY OE, 
eet, 8) j wer wew 
eis 18 &s° —_ 
| STARTO peslee Pee ire i774 
a 
HR BES i220 ine 
ESR eat tet 18, ser 040 
Bess Boi iss izes 1e7Se 1684 
Bex: eee ieee 1650 
| StSere Sossoe ieee ese, 
Smale eaves Bis ieee 
eoSSe - 1732 
etaeud BSE SG aye 17348 768 
| STARYS §=O03644 ie ee 
| STARYS 9 D03564 io, sec4 4 > 4133-4198 
fs tee 8 ke aR oe us uy Ye uN 
Stacy 1851 745* ©2315 . 
erehee 001019 s3ice 3214 a 4225 760 1903 19793 som Baty 
| rcs 014236 1723 41438 41 ‘ 712 1715 1754 1 3 3335 3229 22 | 555 
| STOLy peices (See esr lease sere ate sig sels esez e528 3218 
‘Ea”  Bitess 265g" BOs sous Ba? Ba a 
| oy 5373 S361 3593 SEI 
18158 1g 4259 3332406 «2520 «37308 
TAPS 937006 37348 ©3737 
| TAP 517024 3740 43439-37448 
17970 37478 
TRPGI 4 3743 
| TAPGOA pieiat 3736 a75ee 3774 
Bis fe 
‘eg Bip Sbe 376 sens 3798 3600 
if 017354 avo gaage 
t Bett petess WO38 totze = Ne 10 4314 * 33018 3302 TEN 
Terra O80610 sites ye7de ERNE 0b Y307# yaDBE 43108 seers Saree Sag) Beads Sra “4 
TORLF: 14078 724 = 2736 3736%  3754% 3361 340 
MPSY 001002 3778 2690 e 0s 37.30% 349% 3356 
veri se reat sea scree 231% abies week simp ce ae 3638 9 S640# = 38 14* 
TEMP2 000710 ices Gees” S, .? See eysve ©3350 3368 M074 
2S# 2431 4247" 4o4 
TEMP2 poo7ie iret Gates ais, 261s, 2aots | 28088 pi ale cea | a 
. ee Gee Ee 3998 4022" 4026" 40 
ter Beopha ite 2 Oe 3997# 
ue. 900704 13768 





roe 





ne a mn me ee a mc a er ee — e. -  e + ee ee +e 








. 
nip “11 TS03 OR TUIO.N.4 MULTIDRIVE DATA RELIABILITY EXERCISER MACYL1 27(732) O4-NOV-76 11:29 PAGE 121 
| SahO.Fs CROSS REFERENCE TABLE -- USER SYMBOLS 
: : sR +) 2: Se il 
Tne gee et, 302, OR, EE 
TINP «00722 1571 26278 
| TINPA 10732 3628 © 26308 
| TINPS 010752 26348 2636 
| TINPB1 911000 2638 8 86abuce 
| TINPO. Ot 2641 86 BYES 
TINPOA 61131 2693 46 26958 
TINPOS 011326 2691 26988 
TINPOC 011364 e704e 2707 
1] 011416 e705 Ss«e7 ile 
TY 011436 e7le ss a7iSs 
Ti piiase 2714 a7 lbs 
| TIneoO O11 2679 ® 294 2710 2745 
'TINPL] O11446 27178 
| TINP2 O11S26 eves 27298 
| TINP2A 911606 27 e74i8 
| TINPSE O11E34 2697 a743—ts« 7H 
| TINP3S) 011654 27508 
| TINPY  Oler6y 2e00e 3815 
| TKB D00660 13628 © D418 3817% 4021s 4026 4267 
| TKS DOdeSs 13618 1639* 2366# 3417 2435* 3808* 3818% 4020s 
‘TIMEX 900646 13578 2042 2311 e464 2784 2785 4168s 
/TMFLG 900756 13978 046s 206S* ei04e 2114 e254 2 2304 
| TOB 005702 2. 1653 3654* 3664* 36718 3893% 4034" 4035 
Pat 40S7e 4062 4107" 4117e 4Sl26e 4128% 4131 4136 
920670 3655 3665 3872 389 4041 4044 4047? 405] 
TPB 13648 GOGse 4133" 413 
TP0S = Olea4e 2701 2728 e740 28318 28 
TPS 13638 4060 1290 
TSTaL 000636 13538 1749 #81752 3 2535 26820 2622 
TTIN  O2045e 3878 40208 42es 
| TTINT BI 75o4 1302 2 
/TTINTO 617436 3810 38148 
TTIN]  Se0476 40248 4025 
TTIN2  Oe0Sie 4028 
020530 1632 16% 17 m1 1803 1822 1828 
1 2102 «le? ssBleSsiB13GS—t«éi2L'GD 
2341 2350 2356 363 2422 e482 2485 2496 
2b49 = BSP ? p683 2709 2716 e718 # 27 
280i 2819 3265 3e 78 
3465 3470 75 #3488 ©3496 3513 
3661 369% 3699 3742 3745 # +3748 #3761 3781 
3681 3913 3919 39 4014 
) Hi64 BBC 4200 4202 4242 4e72 4274 
TTR 20272 2430 2659 2674 2689 2723 2735 2758 2769 
2825 39768 4160 
TTRO 020300 39788 4000 
G20326 3980 «39848 
TTRIA  Oe0ade 3985 39878 
TTRIB 4 Oe0aseE 3988 «© -:39908 
TTRe } © 020414 3983 4OOls 
TT d20424 4002 004 
TTr4  O20434 yorcS 40078 


me me > ee re eee 








oy FE: 
inut 





a 
Bra 


ee eee es 


ay 


Se 


r a es erm ee 


Sts} 


yeRBReHs 
aaa 


2 
E: 
fa 


es 


stata 
Bsws 


cornees 


a2 


Ritdeee ene 
RORERERS 


Bits 


REFERENT 


i 


-—frorururururururur 
0 02 b= bn 0a po he he 
hoe uu 
rururufrurerorufurururnre 


ii 


2071 


nae 


TSI ae ee MIR tet ete he 
See ae ee 2 Ge os a ot 


id MULTIORIVE DATA RELIAS 
E TABLE -- USER SYMS 


2676 
2875 
3734 


2lles 


2170 


2811 
e0iS# 


2118 


2086 
e1l6 


2813 
ecs4s 


2104s 


ILITY EXERCISER ‘ 
OLS 


3043 
28028 


2148# 


735 1644% 
e7eb® 8 2738# 
3863 3314 
17728 1823 
1940# ~ 1949% 
2630% $32 
3451 3456 


3065 3094 


3452 





MACYI1 27(732) 


31 






O4-NOV-76 11:29 PAGE 122 





Bs) 

Mt] 
. 
“the-- 


EER 
a 


pngesae 9° BRRRES 


\=) 
~ 


ane 


ee 


r 
3 


R TUIO,N.W MULTIDRIVE DATA RELIAS 
CROSS REFERENCE TABLE -- USER SYMSO 


sd 
é 





20368 


31338 
3087# 


2432 


2423 


oe EXERCISER MACYL1 27(732) O4-NOV-76 11:29 PAGE 123 


3086# 3090% 3091 309S# 3103 3134 31354 
2434 


2426 


129Se 12978 13018 13088 13148 13178 13208 
15318 iS338 15358 15378 15398 1S4le i543s8 
15608 S628 iSh4s 1565s S688 i5708 15728 
























| TMA,B-21 TSO3 OR TULON WN MULTIORIVE DATA aie EXERCISER MACY11 27(732) O4-NOV-76 11:29 PAGE 125 


tMHD.P11 CROSS REFERENCE TASLE -- MACRO NAM 


©. 
ts: 


rafaenees 
“PREC 


i 
1 
] 
i 
1 
1 


ininince coh 
aes 


nun 
Be 


1290 


masiehied 


ae 
£ 


3 


2 

Ed 

& 

x 

“ 

s 

= 

x 

WT z 
| SSSKIP S 
. + 
S 
a 
a 


8 

8 
4-4 
D~< 


1 
i 
1 
1 
1 
1 
1 
ls 
ls 
is 
1 
1 
1 
1 
1 
1 
1 
1 
1 
i 
1 
1 
1 
18 
| -$ACT1 1 le208 1288 
i 
1 
1 
1 
i 
1 
1 
1 
1 
i 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


11. 7503 O8 Tu10,N ILTJORIVE DATA RELIGBILITY EXERCISER MACYI1 27(732) O4-NOV-76 11:29 PAGE 126 | 
ozt aoe 6}, 5999 OR, Sea eBetaeNte FRE PO maces Na MES : 


SUPR ls 
. STRAP le 
$TYPE ls 
STYPD le 
.STYPE ls 
STYPD is 
$4008 ls 

170 le 





a ee ee ee 






T™,A,8-11 TSO3 OR TUIO,N.W MULTIDRIVE DATA RELIABILITY EXERCISER MACY11 27(732) O4-NOV-76 11:29 PAGE 122 
OZTMHD.P 12 CROSS REFERENCE TABLE -- PERMANENT SYMBOLS 


& 
tye 
wo 

oo 

Ww 
‘wn 
Oru 
Mo 


Lede 1772 1860) 1920 1940) 1953 BSS 2157 49S S11 = 26h2 2744 = 2878 
33 Os 33123314 = 3315) = 3398 3415 SH16 924 
3951 4175 4e 
ASL 4306 4307 4308 
Bcc 3073 
BCs 3036 3313 
SEQ 16291641 O 1692 1698 1710 1713 
1806 1811 1831 1833 1863 1872 
1989 1997) 9 2010) 2013 202l §=— 2043S 2079 
e268 4 ce7B ie e300 e3}2 2316 2346 
eSe2 0 2638 e7l2 8785) 737 8743 
31753178 «Ss 31893181 18 3256 
3869-3572 3591 3610 3612 3616 
3783-3819 3857-3864 38 38 
4230 4256 4312 
BGE 4302 
| BCT 2330 4300 
| BHI 3293 3953. 39550-3988 
1 BIC 1682-17420 s«1761 Ss «1859S 2019S 2051 §= 2087 
2868 3077 93079 «693080 ©6088 «389 3089 
3615 3776 «9= 3824 3848 «2S 816 2S 3987S 4110 
|81c8 48=s «3205 «= 3362 «= 4309 
| BIS 1667 1798 Ss 3835): 1917 2003) 2184 = 2255 
| 3090 3131 493138) 3768784 3858 3821 
/BISB 8 3214 4310 
SIT 1709 «1712S 1715) ss1718—Sss1724 Ss «17281731 
1848 1850 1857 1903 1918 1989 1934 
2085 2099 «2124 «82133 «2180 §8=6— eee = 2218 
22939 8338 0S 347 2360) 407 413 8433 
| 31i9 3123 3125) 3128) EB IHD 
2585 87 8693699 93605 3618 «39 3668 «= (36:73 
: 3790 «37920-3853 3856 20 3863) = 3869 =: 3887 
/BITB 3177 4131 
| BLO 3926 
/BLOS 3296 4002 4005 
| BMY 1818 2038 2048 2307 38 4144 
BNE 1634 «1657 «1662S s«1675 0 1677S «1700S 1785 
| 1904 1935 1939 2005 2018 2030 
eieS 2134 B14HSsBb2 P17 22 
| 2361 e408 e414 24 e434 «2476 «= 2478 
! es3 a pace S000 «S010 30303033 
3193 6207 463216 «= 3220)» 3260 39: 3ebe 
3525 = 3535S 3581 83 8 3588 3597 
3737 3753758 3772 3778 
| 4072 4074 HN 413 4138 = 4176 = 4204 
| BPL 2324 «2418 «39 2862 72 20 3614 4025 
| BR 1643 1651 Ss «172d «Ss «1804 =: 1809S «1814 =: 1820 
2498 = BB ese = 31823185 313530 
3592 743 «3795S 3801 43= 3873 «= 4H 
4290 4305 4313 4315 
oe 2831 2879 2957 3071 3075 3117 3311 
cLR 1646 1648 1652 1665 1660 
1813 1842 «61868 38=— 186 890 





T™.A,B-11 
aosneB ety 


ee 


_ OR ROee CARPE RENCE Share 


CATR ROKER etme EXERCISER 








MACY11 27(732) O4-NOV-76 11:29 PAGE 129 


YMBOLS 





2900 «290 90 $04 913 951 95 2045 ? 3 112 
33480 334 S30 399 343 486 5 62 3533 ae 32783 3346 
3754 «3763 «3768)=S «3736 «= 3808 «= 3817 3852 3862-3831 )= 3978 «= 3977 
4oSS }6s4070-s—si‘doB2 0426 Ssi«dSS 481 «= 486 S217 —s«B1B Ss 4219)=— «4220 
17 20s22l22)Sss«s1bL)=Ssia26S)=Ss«2183.s«23S3 «BH «O42 ~S—StséDES 2869 
3595 3603 3 423 
3206 3 
ye99s 
1693 1701 
3087 3299 
2039 ©=- 2068 
2945 = 2961 
3570 40-3771 
3749 3787 
1824 2001 
310 
175 
3757 3855 
1637 = 164 
1946 19395 
2406 2432 
2952 a963 
3325 3400 
398 3989 
1671 1672 
1751 1753 
1888 486154 
2113s Bilb 
2269 02S e711 
2363 ©2365 
2489 = 249] 
2652 390. 2654 
2735 2274 
2794 439-2799 
3050 3069 
3272 «20-32 
3419 34 
3475 3478 
3626 
3665 3667 
3784 «= s(3811 
3892 3894 
4o44 = 447 
4isS 
4209 = 4225 
1638 1639 
1699 1694 
17 1781 
1847 1852 
1933 194 
2022 © 204 


Wo _MULTIDRIVE DATA RELIABILITY EXERCISER 
ERENCE TASLE -- PERMANENT SYMBOLS 


T™,A€,8-11 TSO3 OR TUIO,N 
OZtMAD.P11 CROSS REF 
2092 439 20% 101 
e258 5323 e261 
5335 S338 = -Sa8¢ 
ese 484 eve 
2s 5 5 
2653 2655 2656 
eb7m 2 cb7?— ebBe 
2715 2717 #2720 
e7ss 756 ? 
ie Bae 
5o0¢ Bes 8b 
Sais «5080 «= Sae8 
3086 3081 3092 
3186 318 3198 
3304 3307 3317 
3412-3413. 3414 
3459 3461 0S 3462 
348i 3495 3500 
3593 3594 
3656 2660 3662 
3780 3783 3807 
3884 3889 
4907 4013 4026 
4127 «4133s: 135 
4185 4186 4187 
4241 yy 
4584 86 4993s: 
| MOVE 1688 1841 1910 
30% 3121 3183 
4034 4043 4050 
| NEG 2461 2762 2770 
| NOP ies2 i883 1884 
3825 3826 3910 
RESET 1880 
ROL P6320 «s«2BBD 20-3035 
ROLB 2960 
ROR 3972 «3118 39-3493 
| RORB 3395 
RTI 3813 3819 
RTS 1704 1782 1873 
2370 = Bula Ss 
30523104 = ss 3111 
3481 3499 3527 
i 4139 4149 Se43 
SEC 2568 439-3034 
ue 2000 «= 2159~Sfs« S08 
SWAB 1687 {838 {1840 
4089 4093 4098 
TST 628 1676 1697 
2037 2042 2047 
2311 2315 2323 
278 486 BO SOs«E'SD 


en ne ene oe 








2B 
a lo 


3678 = «36 
3816 3818 3844 

3897 3899 
40 4071 4079 


Se ee 


MACY11 27(732) O4-NOV-76 11:29 PAGE 130 


a ce ce ee ee ee ee 
. . © . . 6 . > . 


cROS NCE TASLE -- PERMANENT SYMBOLS 
3219 3259 «32610-3321 «3371 = 3379 
3620 «3638S «SE58 E7138 3876 
4289 4297 
TSTB. 6s P41?,—«s«2917s«s3368 = 3508 ~= 4024 = 027 
ASCII 4 4323 5325. «4307, 4389S «4331 
4 43624366 43744379432 
44396443943 
wd 4494 HGR] SOS 


4656 4663 4666 4671 4680 4681 
47270 4729 
NASL 4 1219 
ND 473 
EDC 1291 1295 1297 
VEN 1609s 4731 


FF «1281 s1895—s«1287 
LIST 1 1287 
ZMACRO 1 
CALL 1220 
“NLIST 1 1287 
“REPT 1287 
-SSTTL = 1288 
ITLE 1215 
WORD «1296 


ERRORS DETECTED: O 
DEFAULT GLOBALS GENERATED: 0 


%, DZ TMHD. SED SLC PORE s TOC=DZTMHD.SML,OZTMHD.P11 
RUN-TIME: 32 47 7 SECONDS 

RUN-TIME RATIO: 341/87=3.8 
CORE USED: 33K (65 PAGES) 


TM.A,B-11 TSO3 OR TUIO.N.W te DRIVE DATA RELIABILITY EXERCISER 
coetaR At g REFERE iF: 


MACYI1 27(732) 






O4-NOV-76 11:29 PAGE 131 





L10 


run ‘ 7&6 KCS. 40 ads igk wrjtes, 127 
> 4 / Py 4 


> 


AO DOOD OO Noo ‘ve Sen dustin nacgunadadeMcsaseitin natant Renu ) 111 
990000001111 L111 122223322993993 9°33 EEE HYY4UHSSSOSSOSSS| ' MES 200006 
c i ‘ % 


77¢ 


DODO UULUUUUUUUUUUUUL EE Ee ee th ena OTE 908 FRIES BUEN L000 OGRE TERS E: li 


yOOoooool 1111111 1122222222 22333333 333 MMMNMNNUMUSSSSSSSSSSEEEEEEEEEE777777777 7BBEEESEEEE99999999990 000000000 





